Tips (1541)

Tip Rating (6):

procedure TForm1.Button1Click(Sender: TObject);
begin
  ADOCommand1.CommandText := 'Create Table MasterTable ' +
    '(FieldName Primary Key);';
  ADOCommand1.Execute;
  ADOCommand1.CommandText := 'Create Table Detailtable ' +
    '(Fieldname Primary Key Refrenced Mastertable(Fieldname));';
  ADOCommand1.Execute;
end;
 * for any Information Mail Me *

Mail: Mostafa @Touska.co.ir