Einzelnen Beitrag anzeigen

Delphieinsteiger

Registriert seit: 17. Aug 2007
45 Beiträge
 
#1

Koordinatensystem in Scrollbox?

  Alt 21. Aug 2007, 10:54
Hallo
Ich bin Delphianfänger und möchte für einen Datenlogger eine Oberfläche erstellen.Bin auch bisher ganz gut vorangekommen und stehe jetzt vor folgendem Problem.ich möchte mein koordinatensystem das ich mit der Canvas funktion gezeichnet habe in eine Scrollbox einfügen damit das KO-System nicht soviel Platz auf meinem Bildschirm einnimmt.geht das überhaupt oder kann man nur Bildimages einfügen?Ich kann ja mal den Quellcode vom bisherigen KO-System beifügen.
Ich Danke für jede Hilfe.


Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Canvas.pen.Color:=clred;
canvas.Rectangle(x+100,y+20,x+700,y+400);
For anzahl:=1 to 20 Do
begin
Canvas.pen.Color:=clred;
Canvas.MoveTo(x+100,y+20*anzahl);
Canvas.LineTo(x+100+600,y+20*anzahl);
end;
For anzahl:=1 to 29 Do
begin
Canvas.MoveTo(x+100+20*anzahl,y+20);
Canvas.LineTo(x+100+20*anzahl,y+400);
end;
begin
S:= ' Temperatur in Celsius';
H:=5;
for i:= 1 to Length(S) do
  begin
  Canvas.Textout(x+20,H,S[i]);
  H:=H+Canvas.TextHeight(S[i])+5;
end;
end;
label1.caption:='Zeitraum in Tagen';
label2.caption:='';
label3.caption:='40°';
label4.caption:='20°';
label5.caption:='60°';
label6.caption:='80°';
label7.Caption:='1 2 3 4 5 6 7 8 9 10';
label8.Caption:=' 11 12 13 14 15 16 17 18 19 20';
label9.Caption:='21 22 23 24 25 26 27 28 29 30 31';
end;

[edit=Matze]Delphi-Tags repariert. MfG, Matze[/edit]
  Mit Zitat antworten Zitat