Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt: Hauptfenster: Fenster-Icon austauschen DEF SetClassLong(3) ! user32,SetClassLongA DEF ExtractIcon(3) ! shell32,ExtractIconA Declare base$,icon& base$=ICON2.ICO icon&= ExtractIcon(0,Addr(Base$),0) Cls SetClassLong(%hwnd,-14,Icon&) WaitInput 16.07.2007 ▲Vollständiges ZitatAbsatzweise CitaZeilenweise Cita
Session-Cookies