Vertikale Linie??

**SaFu**

Hi

Ich bekomme es einfach nicht gebacken, ich versuche eine vertikale Linie im StringGrid zu zeichnen da kommt alles raus nur keine gerade Linie

Was mach ich falsch

markieren

Delphi-Quellcode:

			 if (ACol = 1) And (ARow In [1, 2, 3, 5, 6, 7, 9, 10, 11, 13, 14, 15, 17, 18, 19, 21, 22, 23]) then

  begin

   StringGrid1.Canvas.Pen.Color := clBlack;

   StringGrid1.Canvas.MoveTo(Rect.Top, Rect.Bottom);

   StringGrid1.Canvas.LineTo(Rect.Right, Rect.Bottom);

  end;

end;

**mkinzler**

Die Koordinaten, die du angibst sehen auch etwas komisch aus
Warum nimmst du .Top als X-Position?
Wo soll die Linie gezeichnet werden links, rechts, diagonal?

**SaFu**

Ich möchte die Linie von oben nach unten zeichenen
Aber irgenwie will das nicht so

**mkinzler**

markieren

Delphi-Quellcode:

			StringGrid1.Canvas.MoveTo(Rect.Left, Rect.Top);

StringGrid1.Canvas.LineTo(Rect.Left, Rect.Bottom);

bzw.

markieren

Delphi-Quellcode:

			StringGrid1.Canvas.MoveTo(Rect.Right, Rect.Top);

StringGrid1.Canvas.LineTo(Rect.Right, Rect.Bottom);

**SaFu**

Danke so gehts und ich glaube jetzt habe ich das auch verstanden

Vertikale Linie??

Vertikale Linie??

Re: Vertikale Linie??

Re: Vertikale Linie??

Re: Vertikale Linie??

Re: Vertikale Linie??

Forumregeln

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.861 Beiträge Delphi 11 Alexandria	#2 Re: Vertikale Linie?? 2. Mai 2008, 07:41 Die Koordinaten, die du angibst sehen auch etwas komisch aus Warum nimmst du .Top als X-Position? Wo soll die Linie gezeichnet werden links, rechts, diagonal? Markus Kinzler
	Zitat

SaFu Registriert seit: 8. Nov 2006 1.360 Beiträge Delphi 10.3 Rio	#3 Re: Vertikale Linie?? 2. Mai 2008, 08:15 Ich möchte die Linie von oben nach unten zeichenen Aber irgenwie will das nicht so Miniaturansicht angehängter Grafiken "... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ... Surft Ihr mit dem Taschenrechner?"
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.861 Beiträge Delphi 11 Alexandria	#4 Re: Vertikale Linie?? 2. Mai 2008, 08:19 markieren Delphi-Quellcode: StringGrid1.Canvas.MoveTo(Rect.Left, Rect.Top); StringGrid1.Canvas.LineTo(Rect.Left, Rect.Bottom); bzw. markieren Delphi-Quellcode: StringGrid1.Canvas.MoveTo(Rect.Right, Rect.Top); StringGrid1.Canvas.LineTo(Rect.Right, Rect.Bottom); Markus Kinzler
	Zitat

SaFu Registriert seit: 8. Nov 2006 1.360 Beiträge Delphi 10.3 Rio	#5 Re: Vertikale Linie?? 2. Mai 2008, 08:25 Danke so gehts und ich glaube jetzt habe ich das auch verstanden "... Wie gesagt, die Nutzer von 10, 12, 14 Zoll Display's werden deine Seite nicht in voller Pracht sehen können, ... Surft Ihr mit dem Taschenrechner?"
	Zitat