Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: BinToHex

    Delphi
    by himitsu, 30. Sep 2009
  so wirklich zufällig vielleicht nicht ... vermutlich würde es dank der Code-Optimierung etwa so aussehn :gruebel:
  temp := Edit1.GetText;
  x := PAnsiChar(temp);
  temp := String(x);
  temp2 := IntToStr(length(temp));
  showmessage(temp2);
  temp2 := String(temp)
  Label1.SetCaption(temp2);
  BinToHex(x, y, 5);
  temp := y;
• Forum: Object-Pascal / Delphi-Language

  Re: BinToHex

    Delphi
    by himitsu, 30. Sep 2009
  PAnsiChar(Edit1.Text) gibt keinen Zeiger auf den Inhalt des Edits, sondern einen Zeiger auf eine temporäre und von Delphi verwaltete Kopie des Inhalts.
  
  Tja und dieser temporäre String kann schnell mal überschrieben, gelöscht oder für was Anderes wiederverrwendet werden :!:
  
  eine Lösung wäre jetzt, daß du selber eine Kopie anlegst.
  var
  x: PAnsiChar;
  S: AnsiString;
  
  begin