Ergebnis der Suchanfrage

• Forum: Datenbanken

  Re: (N)umerisches Feld akzeptiert keinen Punkt

    Delphi
    by marabu, 28. Mai 2006
  Hallo Lombi,
  
  ich weiß nicht ob du eine konkrete Anwendung im Sinn hast oder ob das alles nur Übungen sind. Wenn du die Bedienung deines GUI-Programms auf englische Eingaben umstellen möchtest, dann schau dir die Demo im Anhang an. Sie zeigt dir, wie du Benutzereinstellungen auf Programmebene vornehmen kannst und dich dabei vor einer ungewollten Aktualisierung der Einstellungen schützt.
  
  Nur...
• Forum: Datenbanken

  Re: (N)umerisches Feld akzeptiert keinen Punkt

    Delphi
    by marabu, 28. Mai 2006
  Lombi, ich arbeite gerade die Tax-Demo um.
  
  Bis später
  
  marabu
• Forum: Datenbanken

  Re: (N)umerisches Feld akzeptiert keinen Punkt

    Delphi
    by marabu, 27. Mai 2006
  Hallo Lombi,
  
  gut, dass du nicht über meinen Schreibfehler gestolpert bist - nachdem ich die Variable vorher so oft richtig geschrieben hatte.
  
  
  Warum das? Und hast du die Einstellung programm- oder systemweit verändert?
  
  procedure TDemoForm.EditEKpreisKeyPress(Sender: TObject; var Key: Char);
  begin
  if Key = ',' then Key := '.';
• Forum: Datenbanken

  Re: (N)umerisches Feld akzeptiert keinen Punkt

    Delphi
    by marabu, 26. Mai 2006
  Hallo Lombi,
  
  wenn ich deine Zeilen richtig interpretiere, dann möchtest du in deinem Control EditEKpreis eine Zahl mit Nachkommastellen im amerikanischen Display-Format (DecimalPoint ist Punkt, ThousandSeparator ist Komma) eingeben dürfen und diese Zahl soll beim Verlassen des Edit-Controls im passenden Datenfeld einer updatefähigen Query gespeichert werden, die du vorher in den korrekten...
• Forum: Datenbanken

  Re: (N)umerisches Feld akzeptiert keinen Punkt

    Delphi
    by marabu, 25. Mai 2006
  Jetzt wäre es gut die relevanten Zeilen zu sehen, mit denen du die Berechnung versuchst. Zumindest an der Translate-Funktion kann es nicht liegen - vorausgesetzt, der DecimalSeparator ist korrekt gesetzt und nicht von dir verstellt worden. So habe ich getestet:
  
  
  procedure TDemoForm.ButtonClick(Sender: TObject);
  begin
  ShowMessage(
  FloatToStr(
  StrToFloat(
  ...
• Forum: Datenbanken

  Re: (N)umerisches Feld akzeptiert keinen Punkt

    Delphi
    by marabu, 24. Mai 2006
  Hallo Lombi,
  
  da war ein Fehler in meiner Funktion. Ich habe ihn korrigiert und du müsstest dir den Code nochmal kopieren.
  
  Sorry
  
  marabu
• Forum: Datenbanken

  Re: (N)umerisches Feld akzeptiert keinen Punkt

    Delphi
    by marabu, 24. Mai 2006
  Klar - weil die Tausenderpunkte bei der Konvertierung nicht mehr drin sein dürfen. Probier mal so:
  
  
  procedure TDemoForm.ButtonClick(Sender: TObject);
  var
  e: Extended;
  begin
  e := StrToFloat(Translate('123,456.78', '.,', DecimalSeparator));
  end;
• Forum: Datenbanken

  Re: (N)umerisches Feld akzeptiert keinen Punkt

    Delphi
    by marabu, 24. Mai 2006
  Guten Morgen.
  
  Wir sollten immer daran denken, dass die von der Unit SysUtils importierten Systemeinstellungen (DecimalSeparator, ThousandsSeparator) das Format der interaktiven Eingaben (TEdit) diktieren. Ist nicht schön, wenn eine Anwendung von vielen, die eventuell sogar gleichzeitig geöffnet sind, sich nicht an die Systemvorgaben hält.
  
  Ein Sonderfall ist die nicht interaktive Übernahme...