Help
11 отговора
355 прегледа
Help
Iskam da napravia edna programa s 1 forma i edin buton na neia.Kato se natisne butona da se startira Internet Explorer.Interesuva me funkciata koiato otvaria Internet Explorer-a pri klikane na butona.
Shte sum vi mnogo blagodaren ako mi pomognete
Shte sum vi mnogo blagodaren ako mi pomognete
Re: Help
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Form1.Handle, nil, 'C:\Program Files\Internet Explorer\IEXPLORE.EXE',
nil, nil, SW_SHOWNORMAL);
end;
begin
ShellExecute(Form1.Handle, nil, 'C:\Program Files\Internet Explorer\IEXPLORE.EXE',
nil, nil, SW_SHOWNORMAL);
end;
Re: Help
thanx man obache neshto ne mojah da se spravia i ako imash malko svobodno vreme vij za kakvo stava vypros -> [линк] (7.5KB)
Re: Help
С коя версия е правено това? Не можах да го отворя, но няма значение... Доколкото разбирам искаш да прихванеш извикване на Интернет Експлорер и да го разрешиш или не с парола?
Re: Help
Na Delphi 5 sym go pravil.Predi kato se rovih iz net-a otkrih eto tova "With each start of Windows NT(v moia sluchai 98 i pak stava) the explorer (explorer.exe) is started as one of the first programmes. The problem is that the system does not however search directly in the index %SystemRoot% for this programme, but looks in other places such as, for example, the index c:\ "
Az shte preimenuvam moiata programka na explorer.exe i shte ia sloja v C:\.
Tazi programka shte iska parola i ako tia e viarna shte se zaredi istinskiat explorer.exe ako ne shte izpishe che parolata e greshna.I syshto taka sym slojil i edin buton za Shutdown na komputyra.
Problema mo beshe che neznam funkciata za otvariane na explorer.exe
Probvah tva deto mi go kaza ama neshto nestana de da znam moje bi az sym obyrkal neshto
Az shte preimenuvam moiata programka na explorer.exe i shte ia sloja v C:\.
Tazi programka shte iska parola i ako tia e viarna shte se zaredi istinskiat explorer.exe ako ne shte izpishe che parolata e greshna.I syshto taka sym slojil i edin buton za Shutdown na komputyra.
Problema mo beshe che neznam funkciata za otvariane na explorer.exe
Probvah tva deto mi go kaza ama neshto nestana de da znam moje bi az sym obyrkal neshto
Re: Help
Задай nil като първи параметър на ShellExecute.
Go on, prove me wrong. Destroy the fabric of the universe. See if I care.
Go on, prove me wrong. Destroy the fabric of the universe. See if I care.
Re: Help
Ето описание на функцията, намира се в ShellApi unit.
Не съм сигурен дали с първи параметър - nil ще работи тъй като ще има несъвместимост на типовете май....Варианта, който ти пратих преди - си работи.(при положение че формата ти има име "Form1" разбира се ...)
ShellExecute(Handle, Operation, FileName, Params, Folder, ShowCmd)
Handle (HWND) is the window handle of the parent window, for instance the window handle of the main form of our application.
Operation (PChar) is a pointer to a null terminated string that contains the name of the operation to perform, which can be 'edit' (launches an editor and opens the document for editing), 'explore' (explores the specified directory), 'find' (opens the find window starting from the specified directory), 'open' (executes or opens the file with the associated application), 'print' (printes the specified file) or 'properties' (displays the file or folder's properties). This parameter can also be nil and in this case 'open' will be assumed.
FileName (PChar) is a pointer to a null terminated string that contains the path and the name of the application to execute, the document to open or print with its associated application, or the folder to open or explore.
Params (PChar) is a pointer to a null terminated string that contains the parameters that will be passed to application specified in FileName. If FileName doesn't indicate an executable file but a document, then Params should be nil.
Folder (PChar) is a pointer to a null terminated string that contains the path that will be taken as the application's folder by default. This parameter can be nil.
ShowCmd (Integer) indicates the way the application specified in FileName will be shown. There are various possible values:
SW_HIDE
SW_RESTORE
SW_SHOW
SW_SHOWNA
SW_SHOWNORMAL
SW_SHOWDEFAULT
SW_MAXIMIZE
SW_MINIMIZE
SW_SHOWMAXIMIZED
SW_SHOWMINIMIZED
SW_SHOWMINNOACTIVE
SW_SHOWNOACTIVATE
Не съм сигурен дали с първи параметър - nil ще работи тъй като ще има несъвместимост на типовете май....Варианта, който ти пратих преди - си работи.(при положение че формата ти има име "Form1" разбира се ...)
ShellExecute(Handle, Operation, FileName, Params, Folder, ShowCmd)
Handle (HWND) is the window handle of the parent window, for instance the window handle of the main form of our application.
Operation (PChar) is a pointer to a null terminated string that contains the name of the operation to perform, which can be 'edit' (launches an editor and opens the document for editing), 'explore' (explores the specified directory), 'find' (opens the find window starting from the specified directory), 'open' (executes or opens the file with the associated application), 'print' (printes the specified file) or 'properties' (displays the file or folder's properties). This parameter can also be nil and in this case 'open' will be assumed.
FileName (PChar) is a pointer to a null terminated string that contains the path and the name of the application to execute, the document to open or print with its associated application, or the folder to open or explore.
Params (PChar) is a pointer to a null terminated string that contains the parameters that will be passed to application specified in FileName. If FileName doesn't indicate an executable file but a document, then Params should be nil.
Folder (PChar) is a pointer to a null terminated string that contains the path that will be taken as the application's folder by default. This parameter can be nil.
ShowCmd (Integer) indicates the way the application specified in FileName will be shown. There are various possible values:
SW_HIDE
SW_RESTORE
SW_SHOW
SW_SHOWNA
SW_SHOWNORMAL
SW_SHOWDEFAULT
SW_MAXIMIZE
SW_MINIMIZE
SW_SHOWMAXIMIZED
SW_SHOWMINIMIZED
SW_SHOWMINNOACTIVE
SW_SHOWNOACTIVATE
Re: Help
Uff man kak li ne probvah i ne stava eto skivai kakyv error-a
ako ti idva neshto na um kaji ako ne zaebi
[Error] Unit1.pas(28): Undeclared identifier: 'ShellExecute'
[Error] Unit1.pas(28): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(28): Missing operator or semicolon
[Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit1.pas'
ako ti idva neshto na um kaji ako ne zaebi
[Error] Unit1.pas(28): Undeclared identifier: 'ShellExecute'
[Error] Unit1.pas(28): Illegal character in input file: '"' ($22)
[Error] Unit1.pas(28): Missing operator or semicolon
[Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit1.pas'
Re: Help
ShellExecute е дефинирана в модула ShellAPI. Демек за да я ползваш добави към Use .... , ShellAPI.
чети и дишай по-леко
чети и дишай по-леко
Shell за Windows?
Интересно ми е какво се цели - дали искаш да подмениш shell-а на Windows? Ако това ти е целта съм писал статия за shell на Windows 9.x. Има малко трикове дето инак отнемат време за търсене.
Ако ти е интересно: [линк], Статии\Windows 9.x shell
чети и дишай по-леко
Ако ти е интересно: [линк], Статии\Windows 9.x shell
чети и дишай по-леко
Re: Help
Като че ли го бях написал - за ShellApi де ,ама виж Pechenia право казва, тъй ще стане работата.
Успех!
Между другото във [линк] имаше компоненти за въвеждане и криптиране на пароли. Ако не намериш и ако ти трябва свирни да ти пратя един.
----------
По склона към връх Фудзи плахо пълзи охлюв към самото небе.
Успех!
Между другото във [линк] имаше компоненти за въвеждане и криптиране на пароли. Ако не намериш и ако ти трябва свирни да ти пратя един.
----------
По склона към връх Фудзи плахо пълзи охлюв към самото небе.
Re: Help
eeeee nai posle stana :-) yeahhhhhhh thanx Vapi, Pechenia strashni ste ei
otskoro pocnah da polzvam forumite na dir.bg ama veche super me kefiat zaradi user-ite kato vas koito go poseshtavat


otskoro pocnah da polzvam forumite na dir.bg ama veche super me kefiat zaradi user-ite kato vas koito go poseshtavat