Integer aus DataSet Laden

[shmia]

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));