Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#2

Re: Punkte im gleichen abstand auf die Form?

  Alt 27. Mär 2004, 11:23
einfach 2 schleifen machen (x- und y-schleife) und darin einen punkt an die Koordinate zeichnen. Das ganze noch ins OnPaint und dann müsstes du die punkte sehen

[Edit]Source eingefügt[/Edit]
Delphi-Quellcode:
procedure TForm1.FormPaint(Sender: TObject);
var x, y: Integer;
begin
  for x := 0 to (width - 1) div 5 do
  begin
    for y := 0 to (height - 1) div 5 do
    begin
      Self.Canvas.Pixels[x * 5,y * 5] := clRed;
    end;
  end;
end;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat