Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - Prozedur in Prozedur aufrufen!?
Ashiaka - So 02.11.03 13:50
Titel: Prozedur in Prozedur aufrufen!?
Hi!
Hab ne Frage:
Wie ist es möglich innerhalb einer Procedur eine andere aufzurufen, so dass diese dann 1 mal durchläuft und dann wieder zur eigentlichen zurückspringt?
MfG, Ashiaka
Moderiert von 
Tino: Topic verschoben.
Anonymous - So 02.11.03 13:54
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
| procedure foo;
begin
showmessage('afdnkap');
end;
procedure bar;
begin
showmessage('asd');
foo;
showmessage('asd');
end; |
ist es das oder hab ich deine Frage falsch verstanden?
Killmag10 - So 02.11.03 14:46
Da du denk ich mal noch nicht so gut Delphi kannst erkläre ich dir nochmal den aufbau !
procedure Prozedurname(Parameterliste);
Procedure = sagt das es eine Procedure ist
Prozedurname = ist einfach der Name
Parameterliste = sind die Varieablen und Konstanden die du übergibst (must du auch beim aufrufen immer mit über geben !)
Beispiel
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| Procedure TForm1.test(Sender :TObject);
begin
showmessage('test');
end;
Procedure TForm1.Button1Click(Sender: TObject);
begin
test(Procedure_butten);
end; |
Ashiaka - Mo 03.11.03 00:01
Danke! Werde es mit euren Tipps mal versuchen!
Tino - Mo 03.11.03 10:05
Hallo und :welcome: hier im Delphi-Forum.de!
Wenn die Procedure nur in der einen anderen Procedure aufgerufen werden muss dann kannst du das auch so implementieren:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
| Procedure Test;
Procedure Test2;
Begin
End;
Begin
Test2;
End; |
Dadurch ist die Procedure Text2 nur in der Procedure Text1 aufrufbar.
Gruß
Tino
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!