Hi und zwar habe ich wiedereinmal eine frage,
ich habe nun eine Seite, wo ich was in ein eingabefeld eingeben will, mithilfe eines programmes, was ich am programmieren bin.
So das ist auch garkein problem.

Also um es nicht zu verwirrent zu machen, ihr kennt doch seiten, wo man links vershclüsseln lassen kann. Jetzt möchte ich ein kleines Programm schreiben, wo man wa sin ein Editfeld eigibt, das dann auf der internetseite in das eingabefeld bringt, und mir den verschlüsselten Link wieder zurück in ein Editfeld in meinem programm schikt.

So den ersten Teil, also das mit dem Link auf die Sete habe ich.

Nur wie stelle ich das jetzt an, dass er mir den verschlüsselten Link wieder zurück gibt?

Hier mal den Code, den ich bis jetzt habe:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var List : TStringList;
Quelltext : String;

begin
List := TStringList.Create;
List.Add ('button='+Edit1.Text);
List.Free;
Quelltext := idHTTP1.Post('http://lix.in/index.php',List);
end;

end.

Wäre klasse, wenn mir da jemand helfen könnte.

Huch, hätte nicht gedacht das es so schwer ist, das niemand ne antwort hat.
oder hab ich mich nur unverständlich ausgedrückt?

Naja auf jedenfall musst du mal die url richtig übergeben!

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var List : TStringList;
Quelltext : String;

begin
List := TStringList.Create;
List.Add('url='+Edit1.Text);
List.Add('captcha=1'); //1 heißt mit captcha und und 0 ohne captcha
//List.Free; hier raus
Quelltext := idHTTP1.Post('http://lix.in/index.php',List);
List.Free; //Hier rein
end;

end.

So in etwa, und dann schneidest du dir aus der variable quelltext die input value des eingabefeldes aus, welches den verschlüsselten link beinhaltet. (über string-operationen)

MfG - Ghost007

Edit: Du darfst die liste nicht "freen" bevor du sie abgeschickt hast.

Achso stimmt gibt sinn.

Aber das mit dem einlesen hab ich immernochnicht verstanden.
haste da nicht in beispiel, wie das geht?

Also ich hab mal im Quelltext geschaut und hab mal die Zeile raus gesucht in der der verschlüsselte link steht:

<td><table border="0" width="100%" cellspacing="0" cellpadding="0"><tr><td valign="top"><input type="text" name="url" size="40" style="font-family: Tahoma; font-size: 8pt" value="http://lix.in/-36d924">

</td><td align="right" style="padding-right: 5px"></td>



Nur wie amche ich das jetzt genau, das der diese Zeile ausließt?

Also ich denke mir es muss wieder irgentwas mit der URL sein und mit dem value. Nur wie mache ich das jetzt genau.
Wie gesagt habe sowas noch nie gemacht, und bräuchte ein kleines bestpiel, damit ich es verstehe.

Naja über die funktion Pos() kannst du die position eines bestimmten strings im text feststellen
du durchsuchst einfach den text nach einer markantenstelle und berechnest dir dann daraus was du kopieren musst von dem quelltext, am besten ber Copy() in eine neue string variable.

MfG - Ghost007

Jop die Idee habe ich jetzt auch soweit.

Und zwar habe ich ein paar tests gemacht, und zwar ist http://lix.in/
immer nur einmal im ganzen Quelltext vorhanden.

Gibt es da jetzt befehle für, das der die stelle raus sucht, woe bestimmte wörter stehen, in dem falle der string http://lix.in/ ?
Und das er, wenn er die stelle gefunden hat, alles kopieren soll, was zwischen den beiden " steht?


Dann wäre das problem ja gelöst

schau dir mal die funktion Pos() an !