Sujet Précédent Sujet Suivant

Creer dynamiquement un timage

cs_rippoz Messages postés 4 Date d'inscription mardi 7 janvier 2003 Statut Membre Dernière intervention 23 mars 2005 - 23 mars 2004 à 09:56
attila69000 Messages postés 8 Date d'inscription samedi 6 mars 2004 Statut Membre Dernière intervention 29 avril 2004 - 29 mars 2004 à 00:08

Bonjour ds mon code je detruit un ipreview de type Timage et je voudrait qu il s en creer un autre derriere

le ipreview doit commencer en haut a gauche (0,0) et fait en height 43 et width 40

coment faire ca ?? merci

A voir également:

Timage delphi
Delphi format - Conseils pratiques -Delphi
Delphi thread - Conseils pratiques -Delphi
Delphi decompiler ✓ - Forum Delphi / Pascal
Delphi formatdatetime ✓ - Forum Delphi / Pascal
Fonction opposée a FormatDateTime ✓ - Forum Delphi / Pascal

1 réponse

Réponse 1 / 1

attila69000 Messages postés 8 Date d'inscription samedi 6 mars 2004 Statut Membre Dernière intervention 29 avril 2004
29 mars 2004 à 00:08

Bonjour,

Je pense que ce code te satisfera (ou je l'espere !!!)

procedure TForm1.Button1Click(Sender: TObject);
var
toto: TImage;
begin

toto := TImage.Create(self);
toto.Parent := Form1;
toto.Width := 40;
toto.Height := 43;
toto.Left := 10;
toto.Top := 10;
toto.Visible := true;
toto.Enabled := true;

toto.Picture.LoadFromFile('c:\essai.jpg');
end;

Bon codage !!

Discussions similaires

savoir si un Timage et vide

Convertir un png en jpeg Delphi XE

Parametre de ShellExecute

Fonction Pos().

StringReplace ?

Votre réponse

Discussions similaires