Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - eigene Proceduren und Functionen???


Crazy K - Do 27.03.03 14:42
Titel: eigene Proceduren und Functionen???
Hi Ich habe ein kleines Problem. Ich will eine eigene Procedur erstellen, die einfach ein bisschen code ausführt und gut ist gewesen! :-)

also habe ich folgendes gemacht:

Unter Private:


Quelltext
1:
procedure NeuZeichnen;                    

und dann weiter unten:


Quelltext
1:
2:
3:
4:
procedure NeuZeichnen;
begin
blabla
end;

Das funzt aber nicht. Was mache ich falsch??


jensenwb - Do 27.03.03 15:00

Ich bin zwar Anfänger, aber wenn ich eine Procedure schreibe mache ich das so.


Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Haupt: THaupt;
implementation

uses Unit1, Unit3;

{$R *.DFM}

Procedure ueberstunden;
Begin
blablabla
end;


im Private Breich trage ich nichts ein.

Du mußt bloß aufpassen das die Procedure vor dem eigentlichen Aufruf der Procedure ist.


Alibi - Do 27.03.03 15:23

Du fügst die Procedure der Formularklasse hinzu, wenn du die im Private Bereich deklarierst.
Also musst du auch schreiben

Quelltext
1:
procedure TForm123.MachWas                    


Delete - Do 27.03.03 15:47

jensenwb hat folgendes geschrieben:

im Private Breich trage ich nichts ein.

Wenn du auf Objekte von deiner Form zu greifen willst, dann ist es aber besser deine Prozedur zu einer Methode von deiner Form-Klasse zu machen.