puuh... danke! also jetzt hab ichs wenigstens mit der suchfunktion
das nächste problem: warum wird nur die ID des autors angezeigt, obwohl ich seinen namen auslese? also die prozedur ist so:
Delphi-Quellcode:
rocedure TForm2.Button2Click(Sender: TObject);
var l,n : integer;
ausgeliehen : boolean;
begin
AdoQuery1.Close;
AdoQuery1.SQL.Clear;
AdoQuery1.SQL.Text := 'SELECT * FROM TTitelaufnahme WHERE (Autor LIKE'
+ QuotedStr ('%' + form2.edit1.text + '%')
+ ')';
AdoQuery1.Open;
l := ADOQuery1.RecordCount;
form2.label8.Caption := 'Ihre Suchanfrage ergab '+inttostr(l)+' Treffer!';
form2.Label4.Caption := AdoQuery1.FieldByName('autor').AsString;
form2.Label5.Caption := AdoQuery1.FieldByName('titel').AsString;
n := AdoQuery1.FieldByName('id').AsInteger;
form2.Label4.Caption := inttostr(n);
ausgeliehen := AdoQuery1.FieldByName('ausgeliehen').AsBoolean;
if ausgeliehen then
begin
form2.label19.Caption := 'ausgeliehen';
form2.Label19.Font.Color := clRed;
end
else
begin
form2.Label19.Caption := 'verfügbar';
form2.Label19.Font.Color := clLime;
end;
end;
jetzt wird aber in dem Label 'Autor' nur die ID angezeigt und da wo die ID stehen sollte steht garnix.... der titel und der status werden korrekt angezeigt... also das kann ich mir wirklich beim besten willen nicht erklären!!