Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**dino**

habs nun so gelöst

Delphi-Quellcode:

			var

  Form1: TForm1;

implementation

{$R *.DFM}

function inttobruch(i:Integer):Tbruch;

begin

  result.zaehler:=i;

  result.nenner:=1;

end;

1.war es das was du meintest?
2.so richtig?
3. an der richtigen stelle?

dino Registriert seit: 15. Jul 2006 Ort: Bad Münstereifel 627 Beiträge Delphi 5 Professional	#14 Re: genauen wert 21. Sep 2007, 16:24 habs nun so gelöst zusammenfalten · markieren Delphi-Quellcode: var Form1: TForm1; implementation {$R *.DFM} function inttobruch(i:Integer):Tbruch; begin result.zaehler:=i; result.nenner:=1; end; 1.war es das was du meintest? 2.so richtig? 3. an der richtigen stelle?
	Zitat