CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

nca Juniormester

08. marts 2005 - 09:45 Der er 5 kommentarer og
1 løsning

Manipulere vindue i en anden applikation

Jeg har et gammelt program lavet i Multimedia Viever, som er designet til 640x480. Vinduet, som programmet starter op i, vises altid maksimeret og på en stor skærm ser det ikke godt ud.
Jeg har ikke kildeteksten længere, så jeg kan ikke ændre i programmet. Jeg vil gerne starte programmet op fra et Delpi-program og når programmet er startet op, skal vindues resizes til 640x480 og centreres på skærmen. Herefter skal Delphi-programmet lukkes.
Kan det lade sig gøre?

Synes godt om

stoney Nybegynder

08. marts 2005 - 10:54 #1

uses shellapi

her er et eks med notepad

procedure TForm1.Button1Click(Sender: TObject);

var
wnd: HWND;
begin
Shellexecute(Handle, 'OPEN', 'notepad.exe', nil, nil, SW_SHOW);
wnd := FindWindow( 'notepad', nil);// erstat evt. NIL med formens caption
if wnd <> 0 then
SetForegroundWindow(wnd);begin
movewindow( wnd, (Screen.Width div 2) - 320, (Screen.Height div 2) - 240, 640, 480, true );
end;
application.Terminate;
end;

Stoney

Synes godt om

nca Juniormester

08. marts 2005 - 11:58 #2

Tak for hjælpen.
Ved du også om man kan fjerne minimer- og maximer knapperne fra et andet programs vindue, så kan luk-knappen er tilbage.
Minimer og maximer knapperne opfører sig nemlig meget mærkeligt.

Synes godt om

stoney Nybegynder

08. marts 2005 - 13:44 #3

Det ved jeg faktisk ikke, sorry

Stoney

Synes godt om

cms Nybegynder

08. marts 2005 - 14:50 #4

var
WndStyle: Integer;
Wnd: HWND;
begin
//Wnd := ...
WndStyle := GetWindowLong(Wnd, GWL_STYLE);
WndStyle := WndStyle and not (WS_MAXIMIZEBOX or WS_MINIMIZEBOX);
SetWindowLong(Wnd, GWL_STYLE, WndStyle);
end;

Prøv dette...

Synes godt om

nca Juniormester

08. marts 2005 - 15:18 #5

>>cms
Det virker fint.
Jeg har oprettet et selvstændigt spørgsmål på denne adresse:
http://www.eksperten.dk/spm/598113
Læg lige et svar der og du får dine point.

Synes godt om

cms Nybegynder

08. marts 2005 - 20:07 #6

Det var dejligt at høre :) Jeg har lagt et svar.

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Andet programmering kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
ASP Classic fil fra subfolder Af bsn i Andet programmering	3	07/05/202416:14	08/05/202401:00
Session Variable Af bsn i Andet programmering	3	01/05/202409:44	02/05/202409:29
Modifyed Field for all Records in Access Af ingeman i Andet programmering	2	29/04/202416:05	30/04/202407:19
Delphi - Parser JSON Fil Af juzas i Andet programmering	4	25/02/202407:13	28/02/202420:56
Bat fil Af sjass i Andet programmering	5	15/01/202417:45	15/01/202420:35

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS