Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Edit Felder

    Delphi
    by leddl, 28. Sep 2005
  procedure TForm1.Button1Click(Sender: TObject);
  var
  i: integer;
  Erg: double;
  begin
  Erg := 0;
  
  for i := 1 to 12 do
  Erg := Erg + StrToFloat((FindComponent('Edit' + IntToStr(i)) as TEdit).Text);
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Edit Felder

    Delphi
    by leddl, 28. Sep 2005
  ShowMessage(FloatToStr(StrToFloat(edit1.Text)+StrToFloat(edit2.Text)+
  StrToFloat(edit3.Text)+StrToFloat(edit4.Text)+
  StrToFloat(edit5.Text)+StrToFloat(edit6.Text)+
  StrToFloat(edit7.Text)+StrToFloat(edit8.Text)+
  StrToFloat(edit9.Text)+StrToFloat(edit10.Text)+
  StrToFloat(edit11.Text)+StrToFloat(edit12.Text)));
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Edit Felder

    Delphi
    by leddl, 28. Sep 2005
  Ich hab bisher mit Datenbanken und Datenbankkomponenten noch nicht wirklich viel gearbeitet. Aber da es sich hier ja anscheinend um Integer- oder Floatwerte aus einer DB in DBEdit-Feldern handelt: Kann es evtl sein, daß da eine Besonderheit der Komponenten besteht?
  Falls nicht, hat das ganze Problem ja herzlichst wenig mit der Datenbanken-Sparte zu tun und könnte ohne Weiteres verschoben werden...