связь один ко многим

[kate158]

+

CREATE TABLE [MYTEST] (
	[NUM_REP] [int] NOT NULL ,
	[NAME] [varchar] (100) COLLATE Cyrillic_General_CI_AS NOT NULL ,
	[Y] [int] NOT NULL ,
	[M] [int] NOT NULL ,
	[AKKAUNT] [int] NOT NULL ,
	[DATA] [int] NOT NULL ,
	[ADDRESS] [varchar] (100) COLLATE Cyrillic_General_CI_AS NOT NULL ,
	[PUT] [varchar] (50) COLLATE Cyrillic_General_CI_AS NULL ,
	[GTP] [varchar] (50) COLLATE Cyrillic_General_CI_AS NULL ,
	[GTP_NUM] [int] NULL 
) ON [PRIMARY]
GO


CREATE TABLE [MYTEST_OBJ] (
	[NAME] [varchar] (100) COLLATE Cyrillic_General_CI_AS NULL ,
	[NUM_REP] [int] NOT NULL 
) ON [PRIMARY]
GO

в, общем, что мне сделать, пока не знаю..

[kate158]

Вот, думаю, может организовать поиск по эдит полям, вместо выпадающего списка.. типа

procedure TForm1.Button3Click(Sender: TObject);//поиск по записям
var sb : string;
begin
if poisk.Active then poisk.Close;
poisk.SQL.Clear; 
poisk.SQL.Add('select *');
poisk.SQL.Add('from mytest');
poisk.SQL.Add('where 0=0');
  if (Edit2.Text<>'')then
     begin
  sb:='and NUM_REP='+Edit2.Text;
  poisk.SQL.Add(sb);
       Edit4.Text:=sb;
       poisk.Open;
     end;