IDN بزرگترین مرجع توسعه دهندگان ایران – آموزش زبانهای برنامه نويسی
uses AdoDB;
var
q: TAdoQuery;
db: TAdoConnection;
begin
// Initialize db here
q := TADOQuery.Create(nil);
q.Connection := db;
q.Close;
q.SQL.Clear;
q.SQL.Add(‘Create Table MYTABLENAME (ID COUNTER PRIMARY KEY, MYTEXT1 String, MYTEXT2 String);’);
q.Prepared := True;
try
q.ExecSQL;
except
end;
q.Free;
end;
چهارشنبه ۶ آبان ۱۳۸۸
admin
کدها و ترفندهای زبان دلفی
بدون دیدگاه
خوراک (فید) دیدگاهها
دیدگاه خود را بیان کنید.
باید وارد سایت شده باشید برای دیدگاه دادن