(delphi ;C++ builder) afficher un point rapidement a l'ecran

Marsh Posté le 29-10-2002 à 09:35:03

comment on fait ?
avec le pascal c'etait setpixel()(mais on pouvait acceder directement a la memoire d'ecran aussi)

Reply

Marsh Posté le 29-10-2002 à 09:35:03

Reply

Marsh Posté le 29-10-2002 à 09:36:19

n'importe où à l'écran ? (avec l'objet screen ?)

Explicite

---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:

Reply

Marsh Posté le 29-10-2002 à 09:39:45

[SDF]Poire a écrit a écrit :

n'importe où à l'écran ? (avec l'objet screen ?)

Explicite

oui n'importe ou
je voudrais une gestion rapide de l'affichage mais je crois que c'est pas possible ?

Reply

Marsh Posté le 29-10-2002 à 09:48:24

pour dessiner sur le bureau (tiré du site de Fobec) :

procedure TForm1.Button1Click(Sender: TObject);
var
Picture : TPicture;
Desktop : TCanvas;
X, Y : Integer;

begin
Picture := TPicture.Create;
Desktop := TCanvas.Create;
Picture.LoadFromFile('bitmap1.bmp');
Desktop.Handle := GetWindowDC(0);
X := 100;
Y := 100;
Desktop.Draw(X, Y, Picture.Graphic);
ReleaseDC(0, Desktop.Handle);
Picture.Free;
Desktop.Free;
end;

Et tout est possible

---------------
Des bons sites pour Delphi? http://forum.hardware.fr/forum2.php3?post=16838&cat=10 -- informaticien -- http://www.z0rglub.com/phpwebgallery/ -- Delphi :love:

Reply

Marsh Posté le 29-10-2002 à 09:51:23

[SDF]Poire a écrit a écrit :

pour dessiner sur le bureau (tiré du site de Fobec) :

procedure TForm1.Button1Click(Sender: TObject);
var
Picture : TPicture;
Desktop : TCanvas;
X, Y : Integer;

begin
Picture := TPicture.Create;
Desktop := TCanvas.Create;
Picture.LoadFromFile('bitmap1.bmp');
Desktop.Handle := GetWindowDC(0);
X := 100;
Y := 100;
Desktop.Draw(X, Y, Picture.Graphic);
ReleaseDC(0, Desktop.Handle);
Picture.Free;
Desktop.Free;
end;

Et tout est possible

:jap: Merci je vais regarde ça

Reply

(delphi ;C++ builder) afficher un point rapidement a l'ecran

Sujets relatifs:

Leave a Replay