Wysłanie zdalnego polecenia przez SSH za pomocą libssh2

Witajcie, mam problem z wysłaniem zdalnego polecenia przez ssh.

dopisałem do uMySFTPClient.pas procedurę

 procedure TSFTPClient.SendCom;

var
channel: PLIBSSH2_CHANNEL;
begin

channel := libssh2_channel_open_session(fsession);

libssh2_channel_write(channel, 'reboot', length('reboot'));
libssh2_channel_send_eof(channel);
libssh2_channel_free(channel);

end;

no ale niestety gdy wywołuję ją po połączeniu przez przycisk "Send!!!" nic się dzieje.

Dziś bawiłem się tym samym kodem i zauważyłem, że przyczyną może być to, że funkcja: libssh2_channel_open_session zwraca nil'a dla danego numeru sesji. Spróbuj poprzez libssh2_channel_direct_tcpip i zobacz, czy jest lepiej ;)

Rozwiązanie tutaj:
Problem z połączeniem w kliencie ssh przy użyciu synapse