Jak na Winbox v delphi
Dobry den.
Nevite jak spustim v delphi Winbox i s přihlašovacimí udají.
Tady pišou že to přes přikazovy řadek jde, takže by to mělo jít i přes delphi.
Manual:Winbox
S ip adresou jsem to zvlad.
adresa := '101.101.101.101';
ShellExecute(handle,'open','winbox.exe',pchar(adre sa), nil,SW_SHOWNORMAL);
Jak však k tomu ještě přidat login a heslo?
var
adresa,login,heslo:string;
begin
adresa := '101.101.101.101';
login := 'admin';
heslo := 'admin';
ShellExecute(handle,'open','winbox.exe',pchar(adre sa), nil,SW_SHOWNORMAL);
end;
adresa := '101.101.101.101 admin admin';
inac viz http://msdn.microsoft.com/en-us/library/windows/de sktop/bb762153%28v=vs.85%29.aspx
No jo.
Ja bych to ale chtěl tak, aby se to skladalo s těch 3 stringu.
Nějak takro
ShellExecute(handle,'open','winbox.exe',pchar(adre sa +''+login +''+ heslo) , nil,SW_SHOWNORMAL);
Každy mikrotik jina IP a jine heslo
Tak si zloz tie 3 stringy do jedneho stringu pred volanim ShellExecute, ten s tym nema nic spolocne.
http://www.delphibasics.co.uk/ByFunction.asp?Main= Strings
konkretne
RTL.asp
mohlo by fungovat
prikazovyriadok := adresa + ' ' + login + ' ' + heslo;
a v ShellExecute pouzijes premennu prikazovyriadok
Vzdyt to mas v poradku. Ted jsem to zkousel - mam jednotlive casti zadane v editech a WinBox se normalne spustil a lognul:
Nemam.
Tak jak to mate Vy je to OK.
I ten Winbox musí byt v PChar.
Dik
V PChar musi byt promenna, pokud je tam retezec, Delphi by to mely zvladnout. Ale mozna nové unicode verze uz to tam potrebuji, aby WideString prelozily na string a poslaly spravny ukazatel - pouziti PCHar()