Einzelnen Beitrag anzeigen

Ginko

Registriert seit: 30. Aug 2008
208 Beiträge
 
FreePascal / Lazarus
 
#1

Mit IdHttp (Indy) Text in Feld auf Webseite eintragen

  Alt 10. Apr 2013, 12:56
Hallo, um einen Text aus einem Programm in ein Textfeld einer Webseite einzutragen, versuche ich gerade die Indy Komponente IdHttp zu benutzen. Leider bekomme ich es nicht hin, ich bin mir auch nicht sicher ob ich den richtigen Name für das Textfeld habe.

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
  TextStr: TStringList;
  PostInformationStream: TStringStream;
begin
  TextStr := TStringList.Create;
  PostInformationStream := TStringStream.Create('');
  try
    TextStr.Values['spellcheck'] := 'Test Text';
    try
      IdHTTP1.Post('http://www.wbuch.de/rechtschreibpruefung.html', TextStr, PostInformationStream);
      Memo1.Text := PostInformationStream.DataString;
    except
      on E: Exception do
        ShowMessage('Fehler: ' + E.Message);
    end;
  finally
    TextStr.Free;
    PostInformationStream.Free;
  end;
end;
Html-Code Ausschnitt
Code:
 <textarea name="spellcheck" cols="67" rows="12" onkeyup="getCaretPositions(this);" onclick="getCaretPositions(this);" class="textarea" id="ta1"></textarea>
  Mit Zitat antworten Zitat