Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by X-Dragon,
11. Apr 2003
Ups :) Ich dachte wirklich das würde gehen, seltsam ... . In meinen Programmen, da hab ich gerade extra nochmal nachgeschaut, war es bisher immer sinnvoller die Edit-Felder anders abzufragen, deshalb hab ich es bisher so noch nicht genutzt ...
Also entweder hab ich die Abfrage über FindComponent gemacht bzw z.B. so:
for i := 0 to ComponentCount -1 do
if Components is TEdit then
...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by X-Dragon,
11. Apr 2003
:wiejetzt:
Die Edit-Felder müssen natürlich entsprechend bezeichnet sein und die Anzahl sollte man auch richtig einstellen können.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by X-Dragon,
11. Apr 2003
und so könnte das mit einer Schleife aussehen:
var
i : Integer;
begin
for i := 1 to AnzahlDeinerEditFelder do
if TEdit('Edit'+IntToStr(i)).Text = '' then
begin
TEdit('Edit'+IntToStr(i)).SetFocus;
ShowMessage('Hier ist nix eingetragen!');