Forum: Datenbanken
Delphi
by Gehstock,
9. Mai 2007
Ups mein Fehler in der Test Procedure hatte ich das Vergessen
taco:=strtoint(edit1.Text+edit1.Text+edit1.Text+edit1.Text+edit1.Text+edit1.Text);
Forum: Datenbanken
Delphi
by Gehstock,
9. Mai 2007
Taco=0?
Ausgabe im anhang
Forum: Datenbanken
Delphi
by Gehstock,
9. Mai 2007
Taco ist zb 351708
TAC8 sieht so aus
Feld1 Feld2 Feld3 Feld4 Feld5 TAC08
351708 Sony Ericsson K800i British Approvals Board of Telecommunications (BABT) Europe 01
351732 Benq-Siemens C81 British Approvals Board of Telecommunications (BABT) Europe 01
351776 Benq-Siemens E71 British Approvals Board of Telecommunications (BABT) Europe 01
352130 Samsung Electronics SGH-X160 British...
Forum: Datenbanken
Delphi
by Gehstock,
9. Mai 2007
damit passiert gar nichts mehr
if ADOQuery1.FieldByName('Feld1').AsInteger = (Taco) then //Taco ist schon Integer
aber angezeigt wird nichts mehr
Schnell sollte es schon sein sind 6300 Datensätze im mehreren Tabellen
Forum: Datenbanken
Delphi
by Gehstock,
9. Mai 2007
procedure TFormMain.Open;
begin
while ADOQuery1.Active do
ADOQuery1.Close;
ADOQuery1.SQL.Text := 'select * from TAC8';
ADOQuery1.Open;
While Not ADOQuery1.Eof do begin
// ADOQuery1.FindField('Feld1'):=inttostr(Taco);
ADOQuery1.Locate('Feld1',inttostr(taco),);// zeigt immer den letzten Datensatz
...