Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi GWL_STYLE (https://www.delphipraxis.net/86176-gwl_style.html)

sirius 12. Feb 2007 15:33

Re: GWL_STYLE
 
@robert
Das weiss ich.
Man kann es ja mit LVM_ARRANGE setzen, vielleicht kann man es auch mit irgendetwas abfragen.

Edit:
Zitat:

Zitat von msdn
Extended List-View Styles
Use the LVM_SETEXTENDEDLISTVIEWSTYLE message or one of the ListView_SetExtendedListViewStyle or ListView_SetExtendedListViewStyleEx macros to employ these extended list-view control styles.

Constants
...
LVS_EX_SNAPTOGRID
Windows Vista. In icon view, icons automatically snap into a grid.
...

Wieso vista? Das gibts doch schon bei XP?
Einfach mal probieren ob sich eine der beiden Zahlen Style oder ExStyle ändert, wenn du snaptoGrid ausschaltest(einschaltest).

Robert Marquardt 12. Feb 2007 15:35

Re: GWL_STYLE
 
Na dann mach mal ShowMessageFmt('%.8x', [L]); mit und ohne diese Option aktiviert. Ist der ausgegebene Wert unterschiedlich, dann steht dieses Flag im Style.
Poste dann diese Werte hier und wir schnitzen dir die benoetigte Konstante zum Test des Bits.

delphinia 12. Feb 2007 15:38

Re: GWL_STYLE
 
Zitat:

Zitat von Robert Marquardt
Na dann mach mal ShowMessageFmt('%.8x', [L]); mit und ohne diese Option aktiviert. Ist der ausgegebene Wert unterschiedlich, dann steht dieses Flag im Style.
Poste dann diese Werte hier und wir schnitzen dir die benoetigte Konstante zum Test des Bits.


Der wert ist 56002A40 aber dieser ist immer gleich!

Robert Marquardt 12. Feb 2007 15:47

Re: GWL_STYLE
 
Nun, dann heulst du den falschen Baum an. Die Information ist nicht an dieser Stelle gespeichert.
Probier mal auf gleiche Weise GWL_USERDATA aus.

delphinia 12. Feb 2007 16:37

Re: GWL_STYLE
 
Zitat:

Zitat von Robert Marquardt
Nun, dann heulst du den falschen Baum an. Die Information ist nicht an dieser Stelle gespeichert.
Probier mal auf gleiche Weise GWL_USERDATA aus.

Heulen tu ich NOCH nicht ;-)...

Versuchsaufbau;
Delphi-Quellcode:
  lvHan := GetDesktopListView;
  L := GetWindowLong(lvHan, GWL_USERDATA);

  ShowMessageFmt('%.8x', [L]);
Brint nur Nullen

sirius 12. Feb 2007 17:00

Re: GWL_STYLE
 
GWL_EXSTYLE

delphinia 12. Feb 2007 17:01

Re: GWL_STYLE
 
Zitat:

Zitat von sirius
GWL_EXSTYLE

Delphi-Quellcode:
  lvHan := GetDesktopListView;
  L := GetWindowLong(lvHan, GWL_EXSTYLE );

  ShowMessageFmt('%.8x', [L]);
Auch nur Nullen

delphinia 12. Feb 2007 17:28

Re: GWL_STYLE
 
Ok ich hab es nach viel MSDN lesen


Delphi-Quellcode:
const

  LVS_EX_SNAPTOGRID = $80000;
var
  lvHan: HWnd;
  L, lvStyles: DWord;
  m: integer;
begin
  lvHan := GetDesktopListView;
 // L := GetWindowLong(lvHan, GWL_EXSTYLE);



  lvStyles := SendMessage(lvHan, LVM_GETEXTENDEDLISTVIEWSTYLE, 0, 0);
  if (lvStyles and LVS_EX_SNAPTOGRID) > 0 then
ShowMessage('1');

turboPASCAL 12. Feb 2007 17:30

Re: GWL_STYLE
 
Hi,
verwende doch bitte die Delphi-Tags (Button-Delphicode).


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:53 Uhr.
Seite 2 von 2     12   

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