hallo
ich bin gerade dabei aus lauter nostalgie mich an einem breakout-clon zu versuchen. nun hänge ich aber leider an einer wirklich banalen stelle fest...am layout der oberfläche. ich habe es mir in den kopf gesetzt das menü zu animieren. das funktioniert auch annähernd...sieht jedoch nich so aus wie ich das haben möchte.
gedacht hatte ich mit das so:
ich habe ein hauptformular in das ich 2 frames einfüge. ein frame stellt die spielfläche dar und einer die menüleiste, welche dann verschwinden soll. mit einem timer möchte ich nun einfach den menüframe unter den spielfeldframe schieben. dait das aber auh dementsprechend gut aussieht muss das hauptformular mit verkleinert werden. und genau hier haperts..das sieht einfach nich so aus wie ich das möchte
hier mal die kernprocedure:
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if frame1.left < frame2.left then
begin
frame1.left:=frame1.left + 2;
form1.left:=form1.Left + 2;
form1.width:=form1.width - 4;
end
end;
und das testprogramm zum ansehen
danke