Eigenen style einbauen

[stevejobs]

Hallo zusammen!

Ich sitze jetzt schon vor dem PC nur um das eine Problem zu lösen

Also: ich versuche in Delphi einen eigenen Style einzubauen der sich am rand vergrössern kann und verschieben kann.
aber ich bekomme es nie hin. Ich probierte es mit TImage und Form1.BroderStyle aber es funzt nie

Ich würd mich freuen wenn ihr mir helfen könntet


Danke im vorraus,

Stefan

[zero_x]

Hallo stevejobs,

wie wäre es, wenn du den deinen Code postest? Ich denke, dass dir so keiner weiterhelfen kann.

zero_x

[stevejobs]

Okay,


ich zeige es euch mal

bitte hilft mir

[DeddyH]

Hallo und Willkommen in der DP

Zitat:

Ich sitze jetzt schon vor dem PC nur um das eine Problem zu lösen

Das passiert mir auch manchmal

Evtl. zeigst Du mal ein bisschen Code, wir können ja schlecht erraten, was Du machst.

[stevejobs]

Okay,

1. Ich bin ein Anfänger und deshalb habe ich einen einfachen code. Bitte respektiert mich
2. Ich habe kaum arnung was man im delphi alles machen kann!
3. hier ist der code

Delphi-Quellcode:

procedure TForm1.Image2Click(Sender: TObject);
begin
if Image2.click and Move Y: Z: then MoveToPosition;
end;

end.

ich weiss das es nicht stimmt aber wie soll ich das hinbekommen?
Ich kenn mich mit der Y und Z achse nicht gut aus. Deshalb bin ich ein Loser

[edit=Phoenix]Delphi-Tags eingefügt. Bitte das nächste mal selber machen. Mfg, Phoenix[/edit]

[BullsEye]

Delphi-Quellcode:

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  ReleaseCapture;
  SendMessage(Form1.Handle, wm_SysCommand, $F012, 0);
end;

[stevejobs]

Danke BullsEye

Jetzt fehlt mir nur noch wie ich dieses fenster am rand dann noch verkleinern-vergrössern kann.


Gruss

Stefan

[geofranz01]

Das dürfte dir helfen

[stevejobs]

Danke