Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi prozeduraufruf (https://www.delphipraxis.net/9325-prozeduraufruf.html)

LoL 24. Sep 2003 07:18


prozeduraufruf
 
hi

Delphi-Quellcode:
....
procedure CreateCompos;

type
  TMyPanel = class(TPanel)
    procedure Create_Panel_lo(sender : TObject);
    procedure Create_Panel_ro;
    procedure Create_Panel_Unten;
    procedure Create_Panel_button;
    procedure Create_Button;
    procedure Destroy_Pnl_lo(sender : TObject);
    procedure Pnl_ro_ColorChange;
  end;

...
jetzt meine frage: kann ich mit der prozedur CreateCompos eine der Prozeduren von TMyPanel aufrufen? Wenn ja wie

Chewie 24. Sep 2003 10:12

Re: prozeduraufruf
 
Du kannst die Methode einer Instanz von TMyPanel aufrufen. Mit anderen Worten, du brauchst eine Variable vom Typ TMyPanel.

LoL 24. Sep 2003 10:15

Re: prozeduraufruf
 
ne sry habs schon :hello:

Chewie 24. Sep 2003 10:18

Re: prozeduraufruf
 
Delphi-Quellcode:
var
  MyPanel: TMyPanel; //globale Variable

procedure CreateCompos;
begin
  MyPanel := TMyPanel.Create;
  MyPanel.CreatePanel_button;
end;

LoL 24. Sep 2003 10:31

Re: prozeduraufruf
 
Zitat:

Zitat von Chewie
Delphi-Quellcode:
var
  MyPanel: TMyPanel; //globale Variable

procedure CreateCompos;
begin
  MyPanel := TMyPanel.Create;
  MyPanel.CreatePanel_button;
end;

ohoh.. globale variable :wink:

Generalissimo 24. Sep 2003 11:36

Re: prozeduraufruf
 
Kannst es auch mit Klassen-Prozeduren probieren.

Code:
 class procedure ...
da brauchst dann keine Instanz. Mehr Infos und inwieweit Klassen-Prozeduren verwendet werden können in der OH.

Robert Marquardt 24. Sep 2003 11:58

Re: prozeduraufruf
 
Das mit dem Klassenprozeduren haben wir doch gerade durch.
Es ist nicht besonders sinnvoll keine Instanz zu haben wenn man untergeordnete Komponenten erzeugen will.


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:54 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz