apis do twitter (autenticação não aceita)

Delphi

14/08/2011

Salve galera.

peguei um exemplo na net de envio de post no twitter pelo delphi ... copiei exatamente igual (ctr c, ctr v) ... mas não ta enviando ... oq será q ta faltando ??? o codigo e este :

procedure TfrmPrincipal.btnAtualizarMeusPostsClick(Sender: TObject);
var
stURL: String;
StringList: TStrings;
begin
if Trim(memPostar.Text) = '' then
Exit
else
begin
try
try
stURL := 'http://' + edtUsuario.Text + ':' + edtSenha.Text +
'@twitter.com/statuses/update.xml?status=' + memPostar.Text;
StringList := TStringList.Create;
IdHTTP.Request.Username := edtUsuario.Text;
IdHTTP.Request.Password := edtSenha.Text;
IdHTTP.Request.BasicAuthentication := True;
stURL := AnsiReplaceText(stURL, ' ', '%20');
IdHTTP.Post(stURL, StringList);
memPostar.Clear;
GetMensagens();
except
on E: exception do
ShowMessage('Erro : ' + E.Message);
end;
finally
FreeAndNil(StringList);
end;
end;
end;

o erro é aq ... IdHTTP.Post(stURL, StringList);

eu fiz assim:

IdHTTP.Post(stURL, StringList);
showmessage(IdHTTP.Post(stURL, StringList));

e mostrou a seguinte mensagem de erro dentro do showmessage:

<xml>
<errors>
<error>Basic authentication is not supported</error>
</errors>

andei dando uma olhada na net e vi alguma coisa sobre agora ter q autenticar com oAuth ou algo parecido, mas não tenho idéia de como fazer isto ... alguem pode me dar uma ajuda ????

to usando delphi XE.

obs.
Já vi varios exemplos como o RADTweet --> http://www.andreanolanusse.com/pt/radtweet-twitter-desktop-client-desenvolvindo-em-delphi/

mas estes estão com o modelo antigo de autenticação --> IdHTTP.Request.BasicAuthentication := True;

eu preciso de um modelo ou exemplo com o maneira nova de autenticação, usando --> oAuth
Wagner Tolvay

Wagner Tolvay

Curtidas 0

Respostas

Wagner Tolvay

Wagner Tolvay

14/08/2011

A proposito ... tambem já vi o topico:
https://www.devmedia.com.br/post-14772-Artigo-Clube-Delphi-111-Programando-com-a-API-do-Twitter.html
e é o mesmo caso ... usa a autenticação antiga:  IdHTTP.Request.BasicAuthentication := True;
este topico tambem não pode resolver o meu problema ...
GOSTEI 0
POSTAR