Summe von 2 DBEdit Feldern

[Sir Rufo]

Zitat von blondervolker:

Vielen Dank!!! Geht perfekt...
Wußte leider bis vorhin nicht,dass ein Dataset dazu gehört...
Bin lernfähig...

suche nach Tutorial Datenbanken mit Delphi

Zitat von blondervolker:

Wie bekommt man aber die Nachkommastellen angezeigt? z.B.: 12,500
Bei mir werden nur Zahlen ohne Komma angezeigt.

Was denn nun, per PN an mich werden die Nachkommastellen angezeigt (zu viele) und hier nicht?

Zitat von blondervolker:

Habe es so gemacht:

procedure TForm1.DBEdit75Change(Sender: TObject);
begin
DBEdit77.DataSource.DataSet.Edit;
DBEdit77.Field.Value := DBEdit76.Field.AsFloat * DBEdit75.Field.AsFloat;
DBEdit77.DataSource.DataSet.Post;
end;

//Geht perfekt Volker

Bitte benutze die Delphi-Tags, dann sieht das so aus

Delphi-Quellcode:

procedure TForm1.DBEdit75Change(Sender: TObject);
begin
  DBEdit77.DataSource.DataSet.Edit;
  // Berechnung mit Runden auf 2 Nachkommastellen)
  DBEdit77.Field.Value := RoundTo( DBEdit76.Field.AsFloat * DBEdit75.Field.AsFloat, -2 );
  DBEdit77.DataSource.DataSet.Post;
end;

Wenn nur die Anzeige gerundet dargestellt werden soll (und immer mit x Nachkommastellen) dann schau dir einfach mal die Eigenschaft DisplayFormat an