Grafik im Speicher erstellen für BlobStream (DB)

[DeddyH]

Nochmal für Emil zum Mitschreiben:

Delphi-Quellcode:

function APICallResult: integer;
begin
  Result := not 0;
end;

procedure TForm13.Button1Click(Sender: TObject);
var
  lBool: Boolean;
begin
  lBool := Boolean(APICallResult);
  if lBool = true then
    ShowMessage('Vergleich mit true ergibt true')
  else if lBool then
    ShowMessage('Prüfung ohne Vergleich ergibt true');
end;

Deshalb vergleicht man nicht mit true, das hat mit einer Prüfung auf nil nichts zu tun.