Delphi Anweisung erfolderlich, aber Ausdruck vom Typ Boolean?

Thema durchsuchen

Ansicht

Themen-Optionen

Anweisung erfolderlich, aber Ausdruck vom Typ Boolean?

Ein Thema von SilasF. · begonnen am 17. Sep 2012 · letzter Beitrag vom 17. Sep 2012

Vorheriger Beitrag

Nächster Beitrag

vagtler

Registriert seit: 9. Jul 2010
Ort: Köln
667 Beiträge

Delphi 2010 Professional

AW: Anweisung erfolderlich, aber Ausdruck vom Typ Beelean?

17. Sep 2012, 16:28

Und noch kürzer...

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.Button2Click(Sender: TObject);

var

  Maximum: integer;

  Ausgabe: string;

begin

  Maximum := MaxIntValue([Zahl1, Zahl2, Zahl3]);

  if (Maximum = Zahl1) then

    Ausgabe := '1'

  else if (Maximum = Zahl2) then

    Ausgabe := '2'

  else

    Ausgabe := '3';

  label4.caption := Format('Zahl %s ist die größte Zahl', [Ausgabe]);

end;