Create Tables Detail/Master in Sql Server With Code
1 2 3 4 5 6 7 8 9 |
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; |