Thema: Delphi and-Funktion

Einzelnen Beitrag anzeigen

r2c2

Registriert seit: 9. Mai 2005
Ort: Nordbaden
925 Beiträge
 
#14

Re: and-Funktion

  Alt 6. Jan 2008, 20:48
Zitat von DeddyH:
Immerhin sind dort and, or und xor beschrieben.
Aber dort sind es andere and und or. Auch, wenn sie in Delphi genauso heißen, machen sie etwas anderes.
Ein Negativ-Beispiel:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
  a, b: Boolean;
begin
  a := True;
  b := GaaanzFieseAPIFunktion; // = true(-1)
  if (Integer(a) or Integer(b)) = Integer(True) then
  begin
    ShowMessage('mich sieht man nicht');
  end;
  
  a := True;
  b := GaaanzFieseAPIFunktion; // = true(-1)
  if a or b then
  begin
    ShowMessage('Hallo');
  end;
end;
In C++ bräuchte man nicht ganz so viele Verrenkungen für so n Blödsinn zu machen...

Ein passender Link:
http://r2c2.weingut-rehn.de/content5..._Variablen.htm

mfg

Christian
Kaum macht man's richtig, schon klappts!
  Mit Zitat antworten Zitat