Thema: Delphi sichtbereich formular

Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#3

Re: sichtbereich formular

  Alt 24. Feb 2006, 16:55
Hallo Matti,

bei Spielen muss auch der Level-Ausschnitt gerollt werden können, etwa so:

Delphi-Quellcode:
procedure TGameForm.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  // self.KeyPreview muss True sein
  if Key = VK_RIGHT then
  begin
    with HorzScrollBar do
      Position := Math.Min(Position + 1, Range);
    Key := 0;
  end;
end;
Grüße vom marabu
  Mit Zitat antworten Zitat