Kod: Tümünü seç
CBModel.Items.Clear;
with ADOQModel do
begin
sql.Clear;
sql.Text:='SELECT * FROM MODEL '+
'WHERE MARKAREF=markaref ';
ExecSql;
end;
ADOQModel.Open;
Kod: Tümünü seç
CBModel.Items.Clear;
with ADOQModel do
begin
sql.Clear;
sql.Text:='SELECT * FROM MODEL '+
'WHERE MARKAREF=markaref ';
ExecSql;
end;
ADOQModel.Open;
Kod: Tümünü seç
Cmbsirket.Items.Clear;
query.First;
while not(query.Eof) do
begin
Cmbsirket.Items.Add(queryfieldadi.Value);//field adına dikkat et.
query.Next;
end;
query.close;