خواندن اطلاعات از Sqlite

[idinex]

با سلام

من يك كد نوشتم كه مي تونه فايل Sqlite رو بخونه و query هاي مختلفي اجرا كنه. اما نتيجه query ها رو نمي دونم چطور بايد در برنامه مشاهده كرد.
هر چقدر كه گشتم كدي پيدا نكردم. يكسري كدها هم اجرا نمي شدند.
كد من :


procedure TForm1.Button1Click(Sender: TObject);
var
i,i2:integer;
P:pointer;
r:TSQLiteResult;
query,errMsg:PAnsiChar;
rowCount,colCount:cardinal;
begin
i:=sqlite3_open('test',p);
query:='SELECT id,title,status FROM myData';
i2:=sqlite3_getTable(p,query,r,rowCount,colCount,e rrMsg);

showmessage(r^);

sqlite3_close(p);
end;



در اين مثال برنامه فقط اسم فيلد اول رو بر مي گردونه. اما من همه ركوردهاي برگشتي رو مي خواهم ببينم.
مي خواستم من رو راهنمايي كنيد كه چطور مي تونم اطلاعات استخراج شده از sqlite را مشاهده كنم؟

[سعید صابری]

از کامپوننتهای ارتباطی با sqlite استفاده کن. اگه جستجو بزنی میتونی پیداشون کنی