Ergebnis der Suchanfrage

• Forum: Datenbanken

  Re: Datenbank Abfragen

    Delphi
    by shmia, 9. Mai 2007
  Was ist das denn ?? das ist ja total umständlich.
  taco:=StrToInt(edit1.Text); // warum nicht so
  
  // und wenn du nur die ersten 6 Stellen möchtest
  taco:=StrToInt(Copy(edit1.Text, 1,6));
• Forum: Datenbanken

  Re: Datenbank Abfragen

    Delphi
    by shmia, 9. Mai 2007
  Bist du sicher ??
  procedure TFormMain.Open;
  begin
  ADOQuery1.Close; // einmal schliesen reicht !
  ADOQuery1.SQL.Text := 'select * from TAC8';
  ADOQuery1.Open;
  
  memo1.lines.Add(Format('Taco=%d', )); // *** Neu
  memo1.lines.Add(Format('Durchsuche %d Datensätze', )); // *** Neu
  While Not ADOQuery1.Eof do
• Forum: Datenbanken

  Re: Datenbank Abfragen

    Delphi
    by shmia, 9. Mai 2007
  Dann gibt es keinen einzigen Datensatz in der Tabelle TAC8, der im Feld1 der Wert von taco hat!!
  Du musst eben drum schauen, dass in der Tabelle passende Daten enthalten sind.
• Forum: Datenbanken

  Re: Datenbank Abfragen

    Delphi
    by shmia, 9. Mai 2007
  Weil es falsch programmiert ist.
  So geht's:
  procedure TFormMain.Open;
  begin
  ADOQuery1.Close; // einmal schliesen reicht !
  ADOQuery1.SQL.Text := 'select * from TAC8';
  ADOQuery1.Open;
  While Not ADOQuery1.Eof do
  begin
  if ADOQuery1.FieldByName('Feld1').AsInteger = inttostr(Taco) then