Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: UrlToFilename, brauche etwas Hilfe

    Delphi
    by KodeZwerg, 6. Mai 2018
  Es geht ja auch nur um Strings, keine extra units von nöten, ich kann auch ein Winapi beispiel basteln wenn das die Sache erleichtert.
• Forum: Programmieren allgemein

  AW: UrlToFilename, brauche etwas Hilfe

    Delphi
    by KodeZwerg, 6. Mai 2018
  @Emil: Teste mal bitte von hier den Anhang.
  Ich weiß nicht seid wann System.Net.URLClient existiert aber darum geht es ja nicht, einfach das TURI Zeug wegdenken und Memo1 betrachten, das geht mit jeder Delphi Version, höchstens Unit Namespace rausnehmen.
  Das wäre toll von Dir zu hören!
• Forum: Programmieren allgemein

  AW: UrlToFilename, brauche etwas Hilfe

    Delphi
    by KodeZwerg, 6. Mai 2018
  Das mit hintereinander-weg Schreiben ist eine blöde Angewohnheit, wohl wahr.
  Ich mache es oft bei simplen Dingen so das eine Anweisung/Auswertung pro Zeile entsteht mit der ich in nächster Zeile weiterarbeite. Das ist für mich strukturierter aber man kann natürlich allem mehr Luft machen, dann hat man was fürs Auge :-D
  Fehlersuche während man nur String-Inhalt prüft und kopiert, da reicht mir...
• Forum: Programmieren allgemein

  AW: UrlToFilename, brauche etwas Hilfe

    Delphi
    by KodeZwerg, 6. Mai 2018
  Ja Danke nochmal, hab die Raute Zeichen bisher total ignoriert.
  Hier nun mini Update zu meinem Code, auch auf ein "?" oder "#" direkt nach einem "/" reagiere ich nun.
  
  (* Get Parameter & Port *)
  tmp := sURL;
  NoParam := '';
  i := Pos('?', tmp);
  if i = 0 then i := Pos('#', tmp);
  if i > 0 then
  begin
• Forum: Programmieren allgemein

  AW: UrlToFilename, brauche etwas Hilfe

    Delphi
    by KodeZwerg, 6. Mai 2018
  Hallo, ich versuche so etwas wie einen Download Manager zu erstellen, die UrlToFilename funktion dient mir dabei in erster hinsicht ein online-überprüfen auszuweichen, um Dateinamen für eine Listbox zu aufzubereiten, bis hier hin ist noch nichts weiter mit dem Namen geschehen, dank des Records habe ich ja auch noch den Original-String.
  An einen Online-Status abfragen Knopf habe ich auch schon...
• Forum: Programmieren allgemein

  AW: UrlToFilename, brauche etwas Hilfe

    Delphi
    by KodeZwerg, 6. Mai 2018
  type
  TRealURL = record
  OriginalURL, {whatever input it was - its stored here}
  Protocol, {holds used protocol without "://", example "http"}
  Username, {Ham}
  Password, {Eggs}
  Domain, {can be www or ip-adress}
  Sublevel, {may just hold char "/" if source is root plus a filename}
  Filename, {holds logical Name from given input}
  Parameter, {if you need them for further...
• Forum: Programmieren allgemein

  AW: UrlToFilename, brauche etwas Hilfe

    Delphi
    by KodeZwerg, 5. Mai 2018
  Vielen Dank für Tipps!
  
  Function UrlToFilename( Const sURL: String ) : String;
  var
  tmp: String;
  iPos: Integer;
  begin
  Result := '';
  tmp := sURL;
  iPos := Pos('?',tmp);
• Forum: Programmieren allgemein

  AW: UrlToFilename, brauche etwas Hilfe

    Delphi
    by KodeZwerg, 5. Mai 2018
  Welche Unit soll ich nehmen um AnsiReplaceText() bereitzustellen, System.AnsiStrings oder System.StrUtils?
  
  
  Function UrlToFilename(sURL: String) : String; // da Du auf sURL schreibst hab ich Const entfernt
  var
  iPos: Integer;
  begin
  iPos := Pos('?',sUrl);
  if iPos > 0 then sUrl := Copy(sUrl,1,iPos - 1);
  iPos := Pos('//',sUrl);
• Forum: Programmieren allgemein

  UrlToFilename, brauche etwas Hilfe

    Delphi
    by KodeZwerg, 5. Mai 2018
  Hi, ich habe eine Funktion gebastelt die mir aus einer URL-Link-Adresse einen Dateinamen geben soll.
  Mit normalen Web-Links klappt das alles soweit so gut.
  Wenn nur eine Domäne in URL steht, das hätte ich gerne zu "index.html" abgeändert, habt ihr eine Idee wie ich das lösen kann?
  
  Hier der jetzige Code:
  Function UrlToFilename ( Const sURL: String ) : String;
  var
  tmp: String;
  Cancel:...