Code auslager

[BastardOp]

Hi

ich hab im mom schon eine recht große Hauptunit in meinem Prog. Ich arbeite mit Tab und nun möchte ich den Code der zu den einzelnen Tabs gehört auslagern in einzelne Units. Hab schon gelesen das ich meine procedure einfach in einen unit schreibe und dann beim onclick zb meine Procedure aufrufe. Aber ich wollte wensgeht das gesamte onclick ereignis in der extra Unithaben. Ich hoffe ihr vertsteht was ich wil und könnt mir helfen.


MfG
Bastardop

[Tonic1024]

Du solltest deine Struktur überdenken.

Normalerweise gehört alles was in deiner Klasse Form1 (oder wie auch immer die heisst) deklariert ist auch quellcodemäßig in die Unit, wo auch die Klasse, zu der sie dazugehören, deklariert ist.

Was du aber tun könntest, wäre in deinem OnClick die Funktion XY aufzurufen, der einen sinnvollen Namen zu geben, und diese dann in eine externe Unit auszulagern.

Der Unit brauchst du dann nur noch einen passenden Namen geben, damit du sie wieder findest bei Bedarf. Und die PAS-Datei im selben Ordner speichen wie dein Projekt. Um Zugriff auf deine Funktionen zu bekommen brauchst du die pas-Datei nur in die Uses-Klausel aufnehmen, gleich hinter dem Schlagwort "Implementation". Wenn du auch noch Deklarationen in der Unit hast sollte sie lieber (musst) ganz oben in die Uses-Klauseln setzen.

MfG

Toni

[BastardOp]

joa das habe ich im DF ja schon gelesen. Ich dachte nur das es auch so wie oben geschrieben. Aber naja dann werde ich es viell mal so versuchen wie du sagst.

MfG
BastardOp

[uschi]

massu ein panel auf die sheets und lädst deine forms nei.

hasz du saubere klassen und forms

[BastardOp]

wie meist du das mit panel und forms laden?

viell mal eine kleines Bsp. bin im mom noch nicht so ganz oben auf

[uschi]

Delphi-Quellcode:

var pControlHandler:TPanel;
found:TComponent;

[..]
    with TForm(found) do begin
      Parent:=pControlHandler;
      Align:=alClient;
      BorderStyle:=bsNone;
      Show;
    end;

ps. ich finde deinen nick nicht gut.

[BastardOp]

thx werde das ganze zuhasue mal ausprpbieren mal sehen was wird.


Was is an meinem nick denn so schlimm (google mal nach BOFH) dann findets was zu dem Nick


MfG
BastardOp