Affichage de plusieurs images
chayma ahmed
Messages postés
1
Date d'inscription
Statut
Membre
Dernière intervention
-
rooky06 Messages postés 20 Date d'inscription Statut Membre Dernière intervention -
rooky06 Messages postés 20 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
salut je suis debutant en delphi svp je veut faire affichage de plusieurs images(la méme image afficher 10 fois au plus) suite a un click sur une boutton comment ca merci d'avance
procedure TForm1.Button1Click(Sender: TObject);
var
i:Integer;
begin
for i :=1 to 10 do
begin
Image1.Picture.LoadFromFile( 'g.bmp' );
end;
end;
end.
je fait ca mais ne marche pas
salut je suis debutant en delphi svp je veut faire affichage de plusieurs images(la méme image afficher 10 fois au plus) suite a un click sur une boutton comment ca merci d'avance
procedure TForm1.Button1Click(Sender: TObject);
var
i:Integer;
begin
for i :=1 to 10 do
begin
Image1.Picture.LoadFromFile( 'g.bmp' );
end;
end;
end.
je fait ca mais ne marche pas
A voir également:
- Affichage de plusieurs images
- Affichage double ecran - Guide
- Des images - Guide
- Windows 11 affichage classique - Guide
- Images enregistrées - Forum Blender
- Problème affichage page internet google chrome ✓ - Forum Google Chrome
1 réponse
En gros, tu dois declarer, dans une boucle, un Timage que tu crees, auque tu affectes l image desiree et que tu positionnes là où tu le desires
Si il s agit de la meme image que tu repetes à intervales reguliers (image de 10*10)
au close du form tu liberes to image MyBitmap.Free
enfin j espere avoir ete clair mais rien n est mois sur...en tous les cas tu as une piste
Si il s agit de la meme image que tu repetes à intervales reguliers (image de 10*10)
MyBitmap : TBitmap;
...onclick...
var
y: Integer;
begin
y:=100;
MyBitmap := TBitmap.Create;
MyBitmap.LoadFromFile('Brick4.bmp');
for i:=1 to 10 do
Canvas.Draw(i*10, y, MyBitmap);
end;
au close du form tu liberes to image MyBitmap.Free
enfin j espere avoir ete clair mais rien n est mois sur...en tous les cas tu as une piste