
ShellExecute Delphi
Zdravim.
Nevi někdo jak spustit Putty přes ShellExecute i s loginem.
Takto to funguje v CMD v bataku
putty.exe -ssh -pw heslo root@11.11.11.11
Takto mi to take šlape
ShellExecute(handle,'open','putty.exe ',pchar('11.11.11.11'), nil,SW_SHOWNORMAL);
Toto mi vyhodi chybu Invalid port number
ShellExecute(handle,'open','putty.exe ',pchar('heslo root@11.11.11.11'), nil,SW_SHOWNORMAL);
zapomnel jsi na parametry -ssh -pw
Dik.
Ja to zkoušel i s těma paremetry, ale cpal jsem je za putty.exe a ne do pchar
Jestli bych mohl ještě jeden dotaz.
Jak takto spustim přikaz ipconfig.
Funguje mi to.
Problem je že mi CMD jen problikne.
Vim čim to je.
Do bataku se musi přidat přilaz pause.
ipconfig
pause
Ale jak na to přes ShellExecute
Nejlepši by bylo,kdyby to šlo dostat přimo do Delphi třeba do Listboxu.
Už dávnejšie som sem dával príklad ako zachytiť výstup príkazového riadku napr. do TMemo:
pc.poradna.net
Prípadne si to uprav, podľa seba...
Spustis cmd.exe aj s prislusnymi parametrami, okrem ineho aj s parametrom aby ostal otvoreny.
Pripadne spusti:
a pak si otevre vystup.txt
Jaky je ten parametr.
Dnes jsem prošmejdil cely help v CMD a nic nenašel.
CMD /? nefunguje?
Zkus
ShellExecute( handle, 'open', 'CMD.exe', '/k ipconfig -all', nil ,SW_SHOWNORMAL );
Dik