Einzelnen Beitrag anzeigen

zwaem86

Registriert seit: 4. Jul 2006
16 Beiträge
 
Delphi 7 Professional
 
#1

Auf die From zeichnen...........

  Alt 27. Jan 2008, 11:36
Hallo zusammen,

ich steh völlig auf dem Schlauch.............
Man könnte von 'nem gelernten Anwendungsentwickler (der in der Arbeit auch noch in Delphi programmiert) ja erwarten, dass er es hinkriegt mit Canvas umzugehen.

Es ist ja nicht so als wenn ich es nicht schon gemacht hätte..........
Ich wollt heute 'ne Anwendung schreiben die ein bsschen rumzeichnet........
Aber ich bin zu Blöd 'ne einfache Linie zu zeichnen.


Hier mein Code:

Delphi-Quellcode:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  Canvas.Pen.Color := clRed;
  Canvas.MoveTo(10, 10);
  Canvas.LineTo(20, 10);
end;

end.
Es passiert einfach nix!!!!!11elf

kann mir bitte jmd. helfen........

Danke im Voraus.
http://home.arcor.de/opencomedy/Bilder/161.jpg
Nichts auf der Welt ist so gerecht verteilt wie der Verstand. Denn jedermann ist überzeugt, dass er genug davon habe.
(Rene Descartes, fr. Mathematiker u. Philosoph, 1596-1650)
  Mit Zitat antworten Zitat