Re: LuckieDIPS
Klappt es mittlerweile mit ActiveDesktop?
Gruss lkz633 |
Re: LuckieDIPS
Nein noch nicht. Nico will sich das wohl mal angucken.
|
Re: LuckieDIPS
Kann mir mal jemand erklären, worauf die ganze neue Euphorie für LuckieDIPS beruht? Wohl kaum auf dem aktuell aktualisierten Sourcecode. Eher auf den Veröfentlichungen in der ComputerBild?
Wes Wein ich trink, des Lied ich sing... Die Redakteure der Computerzeitschriften fragen stets vorher an... Also was ist wem peinlich? |
Re: LuckieDIPS
Was soll das 4toms? Du pupst den ganzen Tag hier schon rum... wirft ein komisches Licht auf dich :(
(Sorry für ot, lag mich aber am Herzen.) |
Re: LuckieDIPS
Zitat:
Absolut kritikresistente Fans hätte ich auch ganz gerne! Edit: Werde in LuckieDIPS nicht mehr schreiben. Danke. |
Re: LuckieDIPS
Zitat:
|
Re: LuckieDIPS
Hallo Michael!
Heute habe ich mir Dein Programm runtergeladen und bin arg enttäuscht! Zitat:
Mal sehen, vielleicht komme ich in den nächsten Tagen dazu, das Ganze in D5Standard mal zu debuggen. 2. Unter XP Home konnte die Datei nicht gespeichert werden - aber der Ordner wurde angelegt! Ist ja auch klar, Du hast ja sinngemäß programmiert:
Delphi-Quellcode:
Wenn die Datei nicht existiert, kann sie auch nicht gelöscht werden :wall:
if FileDelete(dateinamen) then
speichern else fehlermeldung; Nach dem Kopieren der Ini aus dem Source-Ordner klappte es dann - aber nach dem Anklicken des Löschbuttons war (logischerweise) das Problem wieder da. Irgendwas ist das doch wohl schiefgelaufen - Löschen nur, wenn Datei vorhanden, speichern wenn keine Datei oder Löschen erfolgreich wäre die richtige Vorgehensweise. Ob die Datei existiert, prüfts Du doch ab und schaltest die Buttons entsprechend frei! Der übliche Fehler - man hat selber die Datei schon auf der Platte und vergißt den Test auf einem frischen System. Gruß Dietmar Brüggendiek |
Re: LuckieDIPS
3. (Win64) Ein 64-Bit Shell-Prozess liefert die Item-Texte nicht da der Zeiger für den Puffer nil ist (wird in der Debug-Version abgefangen und Explorer ignoriert die Nachricht).
Gruß Nico |
Re: LuckieDIPS
Zitat:
Delphi-Quellcode:
function IsActiveDesktopActive: Boolean;
var Progman: HWND; DefView: HWND; begin Result := False; Progman := FindWindow('Progman', nil); if Progman <> HWND(nil) then begin DefView := FindWindowEx(Progman, HWND(nil), 'SHELLDLL_DefView', nil); if DefView <> HWND(nil) then Result := FindWindowEx(DefView, HWND(nil), 'HTML_Internet Explorer', nil) <> HWND(nil); end; end; function GetDesktopListView: HWND; var Progman: HWND; DefView: HWND; function EnumDefViewProc(Wnd: HWND; out DefView: HWND): BOOL; stdcall; var ClassName: array [0..255] of Char; begin DefView := Wnd; ClassName[0] := #0; GetClassName(Wnd, ClassName, 255); Result := StrComp(ClassName, 'SHELLDLL_DefView') <> 0; end; begin Result := HWND(nil); Progman := FindWindow('Progman', nil); if Progman <> HWND(nil) then begin DefView := FindWindowEx(Progman, HWND(nil), 'SHELLDLL_DefView', nil); if DefView <> HWND(nil) then begin if IsActiveDesktopActive then EnumChildWindows(DefView, @EnumDefViewProc, LPARAM(@DefView)); Result := FindWindowEx(DefView, HWND(nil), 'SysListView32', nil); end; end; if Result = HWND(nil) then MessageBox(HWND(nil), PChar(ERROR_GETDESKTOPHANDLE), APPNAME, MB_ICONERROR); end; Gruss Nico |
Re: LuckieDIPS
Zitat:
Zitat:
Nachtrag: Sollte alles erledigt sein. Guckt jetzt bitte noch mal, ob richtig gespeichert wird und ob jetzt auch der Active Desktop unterstützt wird. Download Links hier im letzten Posting oder gleich im ersten. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:14 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz