Skjule applications

Hvordan skjule en Delphi application.program Project1, bruker Skjemaer, Unit1 i 'Unit1.pas {Form1}, Windows; {$ R * res} //Erklærer en VAR å hente gjeldende vindu informationvar ExtendedStyle: Integer; begynne Application.Initialize; //Få Utvidete Styles av programmet, ved å sende sin //håndtere å GetWindowLong ExtendedStyle: = GetWindowLong (Application.Handle, GWL_EXSTYLE); //Nå setter Utvidet stil ved å gjøre litt maskeringsoperasjon. //OR i WS_EX_TOOLWINDOW bit, og OG ut WS_EXAPPWINDOW bit //Dette konverterer effektivt programmet fra en App Windows til en //verktøyvinduet. SetWindowLong (Application.Handle, GWL_EXSTYLE, ExtendedStyle ELLER WS_EX_TOOLWINDOW OG IKKE WS_EX_APPWINDOW); Application.CreateForm (TForm1, Form1); Application.Run;. Slutten Anmeldelser



Previous:
Next Page: