Frame aus eigener Prozedur aufrufen

[nahpets]

Wie der Name des Frames ist, den Du der Prozedur übergibst, ist innerhalb der Prozedure "wurscht".
Alle übergebenen Frames werden innerhalb der Prozedure mit myFrame angesprochen.

Nehmen wir an, Du hast mehrere Frames, die da heißen:FrameA, FrameB, ..., FrameH alle kannst Du der Prozedure übergeben, eben mit:

Delphi-Quellcode:

CNCCommandBox(meineVariabel,FrameA);
CNCCommandBox(meineVariabel,FrameB);
...
CNCCommandBox(meineVariabel,FrameH);

In der Prozedure kannst Du sie alle über MyFrame ansprechen. Die Prozedure könntest Du z. B. so erweitern:

Delphi-Quellcode:

procedure CNCCommandBox(H:String;myFrame:TFrame);
begin
  if (H ='A') then begin
    myFrame.visible:=true;
    myFrame.Left:=1;
    myFrame.Top:=2;
  end else
  if (H ='B') then begin
    myFrame.visible:=false;
    myFrame.Left:=1;
    myFrame.Top:=2;
  end else
  if (H ='H') then begin
    myFrame.visible:=true;
    myFrame.Left:=192;
    myFrame.Top:=232;
  end;
end;

[Sir Rufo]

Man sollte es sich so vorstellen

Delphi-Quellcode:

TGermanSpeaking = class
  procedure Say( AText: string );
end;

procedure TalkWith( AGermanSpeaking: TGermanSpeaking );
begin
  AGermanSpeaking.Say( 'Hallo' );
end;

var
  Peter, Klaus: TGermanSpeaking;

TalkWith( Peter );
TalkWith( Klaus );

[pmros]

Zitat von nahpets:

Wie der Name des Frames ist, den Du der Prozedur übergibst, ist innerhalb der Prozedure "wurscht".
Alle übergebenen Frames werden innerhalb der Prozedure mit myFrame angesprochen.

Nehmen wir an, Du hast mehrere Frames, die da heißen:FrameA, FrameB, ..., FrameH alle kannst Du der Prozedure übergeben, eben mit:

Das habe ich verstanden, danke Allerdings will ich, dass der jeweilige Frame aufgrund der Variabel H ausgewählt wird. Deswegen will ich ja nur die Variabel H an die Prozedur übergeben und dann in der Prozedur über die Variabel entscheiden, welcher Frame gezeigt wird und welche Elemente auf dem jeweiligen Frame angesprochen werden.