/ Forside/ Teknologi / Udvikling / Delphi/Pascal / Tip
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
Hent windows standard ikoner.
anger har modtaget 15 point for dette tip
Fra : anger
Vist : 1678 gange

Dato : 02-02-01 14:49

Her er en måde at hente alle windows standard ikoner, lige som "New, Open, Save...."
Opret et imagelist på din form, og derefter skriv følgende :

Uses ShellApi;

procedure GetSystemImageList(ImageList : TImageList);
Var
res : Integer;
shf : TSHFILEINFO;
begin
res:=SHGetFileInfo('', 0, shf, SizeOf(shf), SHGFI_SYSICONINDEX OR SHGFI_SMALLICON );
ImageList.handle:=Res;
ImageList.ShareImages:=True;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
GetSystemImageList(Imagelist1);
end;


 
 
Bedømmelse

Fra : gandalf


Dato : 06-02-01 14:42



Bedømmelse

Fra : gandalf


Dato : 06-02-01 14:42



Bedømmelse

Fra : ironman


Dato : 28-03-01 12:55



Bedømmelse

Fra : Flozzy


Dato : 01-09-01 05:15



Bedømmelse

Fra : crissi2


Dato : 24-05-02 20:19



Du har følgende muligheder
Eftersom du ikke er logget ind i systemet, kan du ikke lave en bedømmelse til dette tip.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.
Søg
Reklame
Statistik
Spørgsmål : 177577
Tips : 31968
Nyheder : 719565
Indlæg : 6409070
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste