Son Kez [çözüldü ]

[umutcanster]

yardımlarınız ıcın teşekkürler sizden başka yardımcı kımse yok buyüzden samimiyetimize dayanarak sorularımı soruyorum amatörüm bitti bitecek.....

sorum şu :

procedure TForm1.Button1Click(Sender: TObject);
var
str:tstringlist;
response:tstringstream;
begin
str := TStringList.Create;
Response:= TStringStream.Create('');
try
str.Clear;
IdHTTP1.Disconnect;
str.Add('kulla=a44');
str.Add('sifre=b44');
IdHTTP1.Post('http://xxx.com',str,Response);
memo1.text := Response.DataString;
except
on e: exception do begin
memo1.text:='';
end;
end;
str.Free;
Response.Free;
end;


bildiginiz gibi bu post idhttp ....

ben bunu


str.Add('kulla=a44');
str.Add('sifre=b44');

burasını

str.Add('kulla=edit1.text);
str.Add('sifre=edti2.text);
gibi yapmak istiyorum ama hata verıyor nasıl yapmalıyım

[F.Atagun]

viewtopic.php?f=2&t=2482

[umutcanster]

özür dilerim hala cozemedim yardım edecek varmı?

[Search]

konu başlıgını düzeltmende fayda var...

Kod: Tümünü seç

str.Add('kulla='+edit1.text);
str.Add('sifre='+edti2.text);

kolay gelsin...

[umutcanster]

teşekkürler '+' hiç düşünmemiştim.... düzeltecegim eger düzeltebilirsem