Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Drehung um 90 Grad (https://www.delphipraxis.net/177222-drehung-um-90-grad.html)

Chris211183 25. Okt 2013 09:43

Drehung um 90 Grad
 
Hallo,

ich habe hier ein rectangle vom Typ TRect und darauf ist ein Frame,
nun will ich das von der Verticalen in die Horizontale drehen, dabei sollen beide (Rect und Frame) gedreht werden

hier ein Auszug

Delphi-Quellcode:
procedure THixBarGraph.Paint;
var
   R: TRect;
   H, W: Integer;
begin
  inherited paint;
  if (Parent = NIL) or not visible
  then Exit;

  Canvas.Brush.Color := FColor;
  Canvas.FillRect(Rect(0, 0, Width, Height));
  case FKind of

sbVertical :  begin
                  H := (Height) div 2;
                  W := (Width div 4) div 2;
                  R := Rect((Width div 2) - W, (Height div 2) - H,
                  (Width div 2) + W, (Height div 2) + H);
                  Frame3D(Canvas, R, clBtnShadow ,clBtnHighlight , 1);
               end;

sbHorizontal : begin
                  H := (Width div 4) div 2;
                  W := (Height div 2);
                  R := Rect((Width div 2) - W, (Height div 2) - H,
                  (Width div 2) + W, (Height div 2) + H);
                  Frame3D(Canvas, R, clBtnShadow ,clBtnHighlight , 1);
               end;

       else;
    end;

end;
wie sag ich ihm das, dass er sich um 90 Grad dreht ?

baumina 25. Okt 2013 09:53

AW: Drehung um 90 Grad
 
Ganz ehrlich : Ich kapiers bis heute noch nicht was du da so wild rumrechnest mit div 4 und div 2 und was sonst noch so.

Chris211183 25. Okt 2013 09:58

AW: Drehung um 90 Grad
 
:dp:

stahli 25. Okt 2013 10:03

AW: Drehung um 90 Grad
 
Zeig doch mal einen Screenshot von Deinem Formular und dann eine Skizze wie es Deine Komponente "gedreht" aussehen soll.

Ist da auch Text drauf oder ein Bild oder andere Controls, die mit gedreht werden sollen oder so?

baumina 25. Okt 2013 10:06

AW: Drehung um 90 Grad
 
Man muss zu dem Thema hier ein wenig diese Vorgeschichte kennen: http://www.delphipraxis.net/177088-b...ml#post1233024

Chris211183 25. Okt 2013 10:15

AW: Drehung um 90 Grad
 
kennt er !!!


:wiejetzt:

Chris211183 25. Okt 2013 10:18

AW: Drehung um 90 Grad
 
Liste der Anhänge anzeigen (Anzahl: 1)
So hier ein Screenshot, habs rot eingefärb

stahli 25. Okt 2013 10:24

AW: Drehung um 90 Grad
 
Und wie sieht es gedreht aus?
Und wie soll es gedreht aussehen?

Formuliere Deine Fragen mal präziser, sonst wird das Helfen schwerer und Du bekommst weniger Antworten... (nur so als Tipp ;-) )

Chris211183 25. Okt 2013 10:26

AW: Drehung um 90 Grad
 
es soll genauso aussehen, bloß halt "liegend" einmal umkippen :lol:

DeddyH 25. Okt 2013 10:27

AW: Drehung um 90 Grad
 
Du kannst Grafiken auch an Deinen Beitrag anhängen, dann muss man nicht erst eine PDF herunterladen. Das horizontal/vertikal soll sich nur auf den Rahmen beziehen, habe ich das richtig verstanden?


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:48 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz