#? zu buchstave/zahl/zeichen ?

[Luckie]

Glaube ich nicht. Da kommt bei mir:

Zitat:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt Project1.exe ist eine Exception der Klasse EConvertError aufgetreten. Meldung: ''#100' ist kein gültiger Integerwert'. Prozeß wurde angehalten. Mit Einzelne Anweisung oder Start fortsetzen.
---------------------------
OK Hilfe
---------------------------

[Pseudemys Nelsoni]

hm ja stimmt, wenn ich das so hab (also ohne #):

Delphi-Quellcode:

procedure TForm1.Image2Click(Sender: TObject);
var
  s: string;
begin
  if Edit1.Text <> '' then
  begin
    s := Edit1.Text;
    Try
      if s[1] <> '#' then
      label2.Caption := chr(StrToInt(s))
      else
      begin
        Delete(s, 1, 1);
        label2.Caption := chr(StrToInt(s));
      end;
    except
      on EConvertError do
      begin
        label2.Caption := 'Falsche Eingabe!';
      end;
    end;
  end
  else
  Label2.Caption := 'Gib halt was ein!';
end;

zeigt mir das programm, wenn ich 958 eingebe als ergebnis "¾" an.
Obwohl 958 = "¥" ist

hmm

[Luckie]

958 liegt weiter hinter dem ASCII-Zeichensatz. Ist also abhänging von der Zeichensatzttabelle, der Schriftart und ob Uni-Code oder nicht Uni-Code.

[Pseudemys Nelsoni]

beide schriften waren Verdana. unicode?

[Christian Seehase]

Moin Silent,

die Funktion chr erwartet als Parameter ein Byte, und macht somit aus 958 958 mod 256 => 190 => ¾.

Wenn Du Unicodezeichen verwenden willst, müssen alle Komponenten auch mit Widestring (-character) arbeiten.

[Pseudemys Nelsoni]

hoi, gibt es dafür ein beispielcode?
ich möchte das beim drücken von Button1, der wert aus dem Edit1.text umgewandelt wird und das ergebnis im label erscheint