DelphiX + Fenster wie in Windows verändern!!!

[ISAS]

Kann man irgendwie die "Grösse" eines Bildes ändern??
Es sollte aber so funktionieren, wie in Windows, wenn man den Arbeitsplatz vergrößert/verkleinert.
Also, die Ordner, etc müssen sich nicht verschieben/verändern, aber das Fenster soll eine andere Grösse bekommen.

[Ben1]

Das ist meine Methode die Größe des Bildes stets an die der Form zu hängen. So kann ich ganz normal die Funktionen der Form verwenden und gleichzeitig auch immer das DXsurface anpassen.

Code:

procedure Tmainform.FormResize(Sender: TObject);
begin

//anpassen der Bildgröße
DXdraw.SurfaceHeight:=Mainform.Height;
DXdraw.SurfaceWidth:=Mainform.Width;

end;

[ISAS]

Ich weiss, war schlecht von mir formuliert. Was ich meine ist ein Bild aus der DXImageList. Dieses Bild sollte man vergrössern können. Ich mach mal hier ein Bsp:

AAA AAA AAA
BBB BBB BBB
CCC CCC CCC
DDD DDD
EEE EEE
FFF FFF
GGG
HHH

(Das ist die Länge des Bildes) (So sollte man es verkleinern/vergrössern können)


Wie man man sieht, wird dann nur ein Ausschnitt gezeigt.
Also, es soll nicht verkleinert werden, sondern man sieht dann halt nicht mehr den ganzen Teil des Bildes, sondern nur zB. 100 pixel, obwohl es 200 gross ist.

[Ben1]

Is nur so'ne Idee, aber könntest du nicht über die Änderung der Eigenschaften Patternheigth und -width sowie Patternskip zur Laufzeit einen Teil des Bildes auswählen ?
So müßte sich eigentlich ein bestimmter Bereich des Bildes auswählen lassen.

[ISAS]

Das mit PatternHeight habe ich schon mal versucht, ging aber nicht. Wies aussieht, kann man das nur einmal einstellen und das ist nicht durch Codeeingabe. Wenn ich das aber mit der Codeeingabe mache, dann ist das so, als ob man nicht die Pattern Height einstellt, sondern die Y-Koordinate

[ISAS]

So gehts:

Delphi-Quellcode:

      with DXImageList1.Items.Find('Player') do begin
      PatternWidth := 16;
      PatternHeight := 16;
      SkipHeight := 0;
      SkipWidth := 0;
      SystemMemory := False;
      //Transparent := Transp;
      //TransparentColor := TranspColor;
      Restore;

Hab aber nun ein Problem. Das Bild wird sozusagen zentriert. Also, zB:

//weggelöscht.

Das zeigt er nicht richtig an.

[mimi]

du möchtes einfach ein bild vergrößern das du in deiner DXImageList hast ?
dafür gibts mehrer möglichkeiten.

1. du baust dir für jede stufe ein eignes bild das heißt du vergräßert es per Zeichen programm

2. du kannst auch DrawRoate nutzen das vergrößert auch du kannst ja den winkel einfach so lassen wie er ist