Du kannst die Stückzahl auf 3 verschiedene Arten auslesen.
(Alternative 1 bis 3)
Beachte, dass ich im
SQL die Feldumbenennung "as Anzahl" hinzugefügt habe.
Delphi-Quellcode:
function TForm2.GetRecordCount: SmallInt;
begin
IBDSetThumbnail.SelectSQL.Text := '
Select count(technikid) as Anzahl from technik_image where technikid = 70';
IBDSetThumbnail.Open;
// Alternative 1
Result := IBDSetThumbnail['
Anzahl'];
// Alternative 2
Result := IBDSetThumbnail.Fields[0].AsInteger;
// Alternative 2
Result := IBDSetThumbnail.FieldByName('
Anzahl').AsInteger;
IBDSetThumbnail.Close;
// Query wird nicht mehr gebraucht
showMessage(IntToStr(Result));