Delphi 7, ikonok dll-ből
2009-02-21T14:02:37+01:00
2009-02-21T20:37:14+01:00
2022-08-12T20:25:34+02:00
Samez
Sziasztok!
kezdő delphiző vagyok és olyan kérdésem van hogy, ha információim nem tévesek akkor az xp egy dll-ben tárolja a rendszer alap ikonjait. azt hogyanlehet megoldani hogy innen választok a delphi programomnak egy ikont?

segítségeteket előre is köszönöm
Mutasd a teljes hozzászólást!
erre van megoldás hogy aztis kilehessen olvasni dll-ből?



Mondjuk legközelebb probald meg egyertelmuen megfogalmazni a kerdesed


//01 Application.Icon.LoadFromFile('02.ico'); //02 Application.Icon:=Image1.Picture.Icon

Magat az alkalmazas ikonjat nem tudod megvaltoztatni futasidoben,mivel azt a fordito beleforditja az exebe,a *.res ben levo informaciok segitsegevel.Olyat lehet hogy keszitesz egy uj res (resource(eroforras)) allomanyt,amiben eltarolsz most itt ikonokat,es menetkozben valtoztatod.
Mutasd a teljes hozzászólást!

  • azthiszem ezaz a dll: %SystemRoot%\system32\SHELL32.dll
    Mutasd a teljes hozzászólást!
  • Resource hackerrel kiszeded a neked megfelelöt

    project\options applications ful load icon betoltod



    vagy kodbol


    uses shellapi ................ Function IconFromFile(Filenev : String; sorszam : Word; var Icon : TIcon) : Boolean; var NagyIcon : Hicon; KislIcon : Hicon; begin ExtractIconEx(PChar(Filenev), sorszam, NagyIcon, KislIcon, 1); if NagyIcon <= 1 then Result := False else begin Application.Icon.Handle := KislIcon; Result := True end; end; procedure TForm1.Button2Click(Sender: TObject); var icon:TIcon; begin IconFromFile('shell32.dll',45,icon); end;
    Mutasd a teljes hozzászólást!
  • ez a kód jó de csak a kis ikont tudom megváltoztatni az alkalmazás tetején, magát az exe ikonját nem sikerül.... erre van megoldás hogy aztis kilehessen olvasni dll-ből?
    Mutasd a teljes hozzászólást!
  • erre van megoldás hogy aztis kilehessen olvasni dll-ből?



    Mondjuk legközelebb probald meg egyertelmuen megfogalmazni a kerdesed


    //01 Application.Icon.LoadFromFile('02.ico'); //02 Application.Icon:=Image1.Picture.Icon

    Magat az alkalmazas ikonjat nem tudod megvaltoztatni futasidoben,mivel azt a fordito beleforditja az exebe,a *.res ben levo informaciok segitsegevel.Olyat lehet hogy keszitesz egy uj res (resource(eroforras)) allomanyt,amiben eltarolsz most itt ikonokat,es menetkozben valtoztatod.
    Mutasd a teljes hozzászólást!
Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd