Einzelnen Beitrag anzeigen

Benutzerbild von Pseudemys Nelsoni
Pseudemys Nelsoni

Registriert seit: 24. Dez 2002
Ort: Hamburg-Harburg
3.551 Beiträge
 
#12
  Alt 24. Mai 2003, 08:50
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
Mario
  Mit Zitat antworten Zitat