Einzelnen Beitrag anzeigen

Benutzerbild von s.h.a.r.k
s.h.a.r.k

Registriert seit: 26. Mai 2004
3.159 Beiträge
 
#2

Re: Glass Form und PNG Object.

  Alt 9. Mär 2010, 14:00
Bei mir klappt das wunderbar. Hab das hier schnell mal runtergecodet:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var
  png : TPngImage;
begin
  png := TPngImage.Create();
  try
    png.LoadFromFile('J:\Icons\crystal_project\128x128\devices\laptop.png');
    //png.LoadFromResourceName(HInstance,'SPLASHSCREEN');
    if (Assigned(png)) then
      Image1.Picture.Assign(png);
  finally
    FreeAndNil(png);
  end;
end;
Dazu noch ein Image1 : TImage auf die Form und pngimage in die uses eingefügt. Ab welcher Delphi-Version diese Unit aber automatisch dabei ist, kann ich die nicht sagen.
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
  Mit Zitat antworten Zitat