Einzelnen Beitrag anzeigen

Benutzerbild von phXql
phXql

Registriert seit: 11. Mär 2004
Ort: Mühldorf
824 Beiträge
 
#1

Problem mit LoadLibraryEx

  Alt 6. Apr 2004, 17:10
also leute, ich habe folgendes Problem. da ich einen ICQ-Client schreibe, und ich mich entschlossen habe, dass der sowas wie Icon-Packs unterstützen soll, hab ich sämtliche icons in ne dll ausgelagert. nun folgendes problem: wenn ich die dll mit dem microangelo librarian (mit dem ich die dll auch erstellt habe) öffe, schauen die bilder noch ganz normal aus:
[img entfernt]

im programm selber werden die allerdings verschwommen dargestellt, schaut so aus, als ob die erst als 32x32 ausgelesen werden(dabei aber hochgerechnet werden, denn die sind in der dll als 16x16 drin), und dann auf wieder 16x16 runtergerechnet werden:
[img entfernt]

ich benutze folgenden code:
Delphi-Quellcode:
procedure LoadIconsFromDll();
var
  Lib: THandle;
  t_icon : TIcon;
  libpath : PAnsiChar;
  i : Integer;
begin
  libpath := PCHar(g_path + 'moeICQ.dll');
  Lib := LoadLibraryEx(libpath, 0, LOAD_LIBRARY_AS_DATAFILE);
  if Lib <> 0 then
  try
    for i := 0 to 15 do
    begin
      t_icon := TIcon.Create;
      t_icon.Handle := ExtractIcon(Lib,libpath, i);
      FormMain.ilContactList.AddIcon(t_icon);
      FreeAndNil(t_icon);
    end;
  finally
    FreeLibrary(Lib);
  end;
end;
die imagelist hat bei height und width 16x16 eingestellt... mach ich da irgendwas falsch?

danke für antworten

phXql
  Mit Zitat antworten Zitat