Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#5

AW: Integer aus DataSet Laden

  Alt 27. Okt 2010, 18:11
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));
Andreas
  Mit Zitat antworten Zitat