Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Canvas.TextOut oder Alternative

    Delphi
    by langer hans, 12. Nov 2007
  Hat sich erledigt!
  Ich musste nur den Pen zurücksetzen
  
  
  for i:=0 to Zeiten.ListBox1.Items.Count-1 do
  begin
  canvas.LineTo(x,500+(-1*(strtoint(Zeiten.ListBox1.Items.Strings))));
  canvas.TextOut(x,490-(strtoint(Zeiten.ListBox1.Items.Strings)),inttostr(500-canvas.PenPos.Y));
  canvas.MoveTo(x,500+(-1*(strtoint(Zeiten.ListBox1.Items.Strings))));
  x:=x+100;
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Canvas.TextOut oder Alternative

    Delphi
    by langer hans, 12. Nov 2007
  Hallo!
  
  Ich zeichne in folgender unit ein Koordinatensystem und dann Zeitwerte mit Canvas.lineto.
  Zetzt will ich die einzelnen Werte beschriften mit den aus einer Listbox ausgelesen Werten.
  Canvas.TextOut sorgt aber für sprünge im Graphen....
  Hat vllt. jemand eine andere Möglichkeit für die Beschriftung?
  
  
  //...
  procedure TGraph.zeichnen;