Forum: Object-Pascal / Delphi-Language
by xxsasch4xx,
27. Sep 2010
Es funktioniert so ohne array sogar wie bomber. geschrieben hat
Danke.
Forum: Object-Pascal / Delphi-Language
by xxsasch4xx,
27. Sep 2010
ja da habe ich vergessen edit hinzuschreiben
ich brauch diese methode damit ich eigentlich imagefelder deaktviern und aktiviern kann.
aber ich habe gedacht wenn ich es erstmal mit edit feldern mache dann wäre es das selbe
aber jetzt hab ich es mit image feldern gemacht und jetzt geht garnix mehr!!
also es funktioniert irgentwie mit bildern nicht
ich weiss auch nicht warum
es ist doch...
Forum: Object-Pascal / Delphi-Language
by xxsasch4xx,
27. Sep 2010
das wird mir zu kompliziert ich mach einfach einen unsichtbaren button den ich immer ausführe :wink:
Forum: Object-Pascal / Delphi-Language
by xxsasch4xx,
27. Sep 2010
procedure bilderdeaktiveren(var form1);
var
FEditArray: array of TEdit;
i: integer;
begin
for i := 0 to 4 do
FEditArray := FindComponent('Image'+IntToStr(i)) as TEdit;
end;
procedure TForm1.Button1Click(Sender: TObject);
Forum: Object-Pascal / Delphi-Language
by xxsasch4xx,
27. Sep 2010
wenn ich den queltext in einen button mache dann geht es. Aber wenn ich es in meine eigene angelegte procedure reinfügen will dann gibt er mir 2 fehlermeldungen aus:
Undefinierter Bezeichner 'Find compenent' und operator ist auf diesen operandentyp nicht anwendbar.
Geht das nicht in einer Procedure oder funktion?
ich brauch das nämlich in mehreren buttons deswegn wär eine procedure sinnvoll
Forum: Object-Pascal / Delphi-Language
by xxsasch4xx,
27. Sep 2010
wenn ich das so mache:
type
TForm1 = class(TForm)
...
private
EditArray: array of TEdit;
end;
...
Forum: Object-Pascal / Delphi-Language
by xxsasch4xx,
27. Sep 2010
hallo, ich habe eine frage wie man einen queltext kürzen kann in dem auf einmal 30 edit felder deaktivert werden die durchgehend nummeriert sind also von 1 - 30
ich würde das mit meinem jetztigen wissen jetzt so machen:
edit1.enabled:=false;
...
bis
...
edit30.enabled:=false;