06-11-2001, 21:23
|
#4
|
|
Senior Member
Iscritto dal: Apr 2001
Cittā: Milano
Messaggi: 3741
|
Quote:
Originariamente inviato da misterx
aggiungo questo scorcio di programma che mostra su una form delle immagini ridimensionate; una sorta di anteprima.
int x=0,y=0;
TImage *Image[100]; // qui č l'errore
for (int i =0; i <FileListBox1->Items->Count; i++)
{
x+=105;
if(x>=105*5) {x=0;y+=105;}
Image[i] = new TImage(Form1);
Image[i]->Top = 5;
Image[i]->Left = 5;
Image[i]->Stretch = true;
Image[i]->Width = 90;
Image[i]->Height = 90;
Image[i]->Parent = Form1;
Image[i]->Picture->LoadFromFile(FileListBox1->Items->Strings[i]);
}
Grazie
|
|
|
|