Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**mkinzler**

Delphi-Quellcode:

			Function TForm1.BerechnePreis( km: integer; var lieferpreis: extended): Boolean;

begin

  BerechnePreis := true;

  if km > 50 then

   begin

     BerechnePreis := false;

   end

   elseif km < 5 then lieferpreis := 10

   ...

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#30 Re: Allgemeine Fragen zu Delphi 18. Nov 2007, 19:52 markieren Delphi-Quellcode: Function TForm1.BerechnePreis( km: integer; var lieferpreis: extended): Boolean; begin BerechnePreis := true; if km > 50 then begin BerechnePreis := false; end elseif km < 5 then lieferpreis := 10 ... Markus Kinzler
	Zitat

Einzelnen Beitrag anzeigen

Re: Allgemeine Fragen zu Delphi