Registriert seit: 15. Sep 2005
Ort: Neu-Ulm
111 Beiträge
RAD-Studio 2009 Arc
|
Re: vorwärts deklaration
3. Feb 2006, 10:51
ebenfalls möglich: zwei Prozeduren/Funktionen rufen sich gegenseitig auf:
Delphi-Quellcode:
implementation
function Funk(x: integer): integer; forward;
procedure Proz(v: double);
begin
[...]
a:=Funk(5);
[...]
end;
function Funk(x: integer): integer;
begin
[...]
Proz(3.14);
[...]
end;
Mach' etwas idiotensicher und irgendjemand erfindet einen besseren Idioten!
|