teilweise funktioniert es schon.
im moment muss ich die ip und port mit in den quellccode schreiben da funktioniert der login mit verschiedenen ports
nun möchte ich das aber trennen und wie im foto die ip und port in der form eingeben
wie deklariere ich das , das die ip und port auch in der oberfläche eingegeben werden kann , da ich mehrere Boxen habe und die mit verschiedenen ip's und Ports nutze
Code: Alles auswählen
procedure TForm1.Button1Click(Sender: TObject);
var
HTTP: TIdHTTP;
begin
HTTP := TIdHTTP.Create;
try
HTTP.Request.BasicAuthentication := True;
HTTP.HandleRedirects := True;
HTTP.Request.Username := UsernameEdit.Text;
HTTP.Request.Password := PasswordEdit.Text;
Memo1.Lines.Text := StringReplace(HTTP.Get('http://192.168.35.147:81'),'<br>',sLineBreak,[rfReplaceAll]); // möchte die IP und Port in einer maske eingeben siehe foto
finally
HTTP.Free;
end;
end;