Zitat:
Nur wie löse ich das, wenn ich den Quelltext dazu nicht kenne.
Ach dafür hättest du den gebraucht...
Zitat:
Delphi-Quellcode:
procedure FormMain.CNCCommandBox(H:String);
begin
if (H ='A') then begin
FrameA.visible:=true;
FrameA.Left:=1;
FrameA.Top:=2;
FrameA.EditX.Text := 'A';
end else
if (H ='B') then begin
FrameB.visible:=false;
FrameB.Left:=1;
FrameB.Top:=2;
FrameB.EditX.Text := 'A²';
end else
if (H ='H') then begin
FrameH.visible:=true;
FrameH.Left:=192;
FrameH.Top:=232;
FrameH.EditX.Text := 'A³';
end;
Ja, so soll mein Code aussehen! Ich probier das jetzt erst einmal. Danke.