Italian community of Lazarus and Free Pascal

Programmazione => Generale => Topic aperto da: AndreaM - Agosto 29, 2013, 08:16:08 am

Titolo: ImageList in una Unit
Inserito da: AndreaM - Agosto 29, 2013, 08:16:08 am

Salve a tutti,
Un componente ImageList lo posso trascinare su una form a design time, caricare poi delle immagini e utilizzarle a run time come voglio!
Se io ho una unit (senza form) con delle funzioni e procedure che hanno bisogno delle immagini non posso utilizzare una ImageList.
Vorrei evitare l'uso delle risorse da integrare nella applicazione, esiste un metodo alternativo, per salvare le mie immagini nella unit?
Saluti a tutti, e grazie!

Titolo: Re:ImageList in una Unit
Inserito da: Stilgar - Agosto 29, 2013, 01:35:36 pm

Controlla ResourceStream.
Hai tutte le info che ti servono ;)

Stilgar

Titolo: Re:ImageList in una Unit
Inserito da: Stilgar - Agosto 29, 2013, 01:39:25 pm

PS: Un esempio.
Carica la unit LResources.

Codice: [Seleziona]

var
Immagine: TPortableNetworkGraphic;
RS:  TResourceStream;
begin
try
      RS := TResourceStream.Create(HINSTANCE, {NomeRisorsa}'Immagine' , {TipoRisorsa}'PNG');
      Immagine.LoadFromStream(RS);
      FreeAndNil(RS);
    except
   end;
end;