Forum: Sonstige Fragen zu Delphi
Delphi
by AndreasP,
21. Dez 2005
mahlzeit,
mit = 0 wird doch im normal fall alle edits geprüft, deshalb der forschlag mit edit = 1.
Forum: Sonstige Fragen zu Delphi
Delphi
by AndreasP,
21. Dez 2005
mahlzeit,
nachfolgender code müßte dein problem lösen. er läst sich noch optimieren wie z.b. ein forzeitiger abbruch oder das nich das ganze formular abgefragt wird. aber das prinzip sollte klar sein.
var a, i: integer;
begin
a := 1;
for i := 0 to Form1.ComponentCount -1 do
begin
if Form1.Components is TEdit then
a := a * (Length(TEdit(Form1.Components).Text));