Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "WinAPI";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

abajo

Maestros, ayuda .. Encontrar ramas similares


YUS   (2001-11-01 03:13) [0]

Maestros, dime dónde está el error? Necesito obtener una lista de ventanas y
nombres de archivos exe.

utiliza tlhelp32;
procedimiento TForm1.Button2Click (Sender: TObject);
var
Ventana: hWnd; hSn: THANDLE; lppe: TProcessEntry32;
búfer: matriz [0..127] de char; ht, hProc: Cardinal;
comenzar
// Estamos buscando el asa de la ventana superior.
Ventana: = GetForegroundWindow;
repetir
if (Window <> Application.Handle) y
(GetWindowText (Window, buffer, sizeof (buffer)) <> 0)
entonces comienza
// Buscando un ID de proceso
ht: = GetWindowThreadProcessId (Window, @ hProc);
// Toma una instantánea del proceso
hSn: = CreateToolHelp32Snapshot (TH32CS_SNAPPROCESS, hProc);
// Obtener la lista de todos los procesos.
si Process32First (hSn, lppe) entonces
repetir
// Comparar el ID y obtener el nombre exe y la ruta ?????????????????
si lppe.th32ProcessID = ht entonces
comenzar
GetWindowText (Window, buffer, sizeof (buffer));
con ListView1.Items.Add do begin
Título: = búfer;
SubItems.Add (lppe.szExeFile);
fin;
fin;
Hasta que no sea Process32Next (hSn, lppe);
CloseHandle (hSn);
fin;
// Buscando la siguiente ventana
Ventana: = GetNextWindow (ventana, GW_HWNDNEXT);
hasta Window = 0;

fin;



troits   (2001-11-01 12:54) [1]

Así que, de repente:
hay
si lppe.th32ProcessID = ht entonces
debe ser
si lppe.th32ProcessID = hProc entonces

Sí, no es necesario transferir a CreateToolHelp32Snapshot hProc.



YUS   (2001-11-01 16:40) [2]

truchas
Gracias por la dirección todo funcionó.
De hecho, si lppe.th32ProcessID = hProc entonces, y ht-innecesario
en ht: = GetWindowThreadProcessId (Window, @ hProc); pero sin CreateToolHelp32Snapshot no funciona



troits   (2001-11-01 17:18) [3]

Quería decir que en función
CreateToolHelp32Snapshot
con el primer parámetro TH32CS_SNAPPROCESS
el segundo es ignorado
Puedes poner, por ejemplo, 0.



Páginas: 1 rama entera

Foro: "WinAPI";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba





Memoria: 0.55 MB
Tiempo: 0.028 c
4-22454
Ewgeniy
2001-10-31 07:40
2002.01.08
Visualización en forma de gráficos desde la memoria.


1-22029
neo_
2001-12-18 12:33
2002.01.08
matar a hilo


1-22224
Oleg Gashev
2001-12-15 11:14
2002.01.08
Problema con el tamaño de la imagen al imprimir.


1-22111
Quien hizo
2001-12-14 08:12
2002.01.08
Cree una lista desplegable en StringGride, de tipo Lookup in DBGride


6-22269
SERGX
2001-10-05 16:31
2002.01.08
Por favor dale la fuente !!





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish French
gallego georgiano Alemán Griego criollo haitiano Hebreo hindi Húngaro islandés Indonesian irlandés Italiano Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese Rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español