Delphi 5 - Matrice di TImage

di
mago
il
1 risposte
M
mago
Pochi posts
Iscritto da
lug, 2004
Messaggi:
11

Delphi 5 - Matrice di TImage

Ciao…
Devo creare una griglia di Timage in modo dinamico.
ho creato 1 matrice di tipo Timage --> TMatrice = array[1..10] of array[1..20] of TImage;
ed una variabile--> Matrice: TMatrice;

gestendola:
var
x,y: integer;
begin
for y := 1 to 20 do
for x := 1 to 10 do
begin
Matrice [x,y] := TImage.Create(self);

Matrice [x,y].Visible := False;
Matrice [x,y].Transparent := False;

Matrice [x,y].Width := 32;
Matrice [x,y].Height := 32;

Matrice [x,y].Left := (x * Matrice [x,y].Width);
Matrice [x,y].Top := (y * Matrice [x,y].Height);

Matrice [x,y].Picture.LoadFromFile('C:\file.bmp');

Matrice [x,y].Visible := True;
Matrice [x,y].Repaint;
end;
end;

Ma non viene visualizzato nulla a video ,
cosa ho sbagliato?
Grazie in anticipo

1 Risposte

  • M
    Morpheus
    Utente Attivo
    Iscritto da
    apr, 2003
    Messaggi:
    72

    Re: Delphi 5 - Matrice di TImage

    Se non metti il parent è ovvio che non ti visualizza niente!! Provaci e vedrai. Se per esempio le vuoi visualizzazre in una form scrivi Matrice [x,y].Parent := Self; oppure qualsiasi altro oggetto esempio pannelli, groupbox, ecc...

    Programmatore Delphi di livello avanzato sempre pronto a collaborazioni soprattutto se remunerative.
Devi accedere o registrarti per scrivere nel forum
1 risposte