Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Stack Overflow (https://www.delphipraxis.net/4029-stack-overflow.html)

Daniel B 11. Apr 2003 21:27


Stack Overflow
 
Hallo,

stack overflow - saves your work an restart Delphi.

Ich habe an einer Komponente was geändert, dann neu Kompiliert und installiert.
Wenn ich nun die Komponente aufs Formular setzen will, erhalte ich immer diese Meldung. Ein Neustart bringt nichts.
Was nun?

Grüsse, Daniel :hi:

Christian Seehase 12. Apr 2003 13:28

Moin Daniel,

wie wär's denn, wenn Du mal mindestens den constructor der Komponente vorzeigen würdest.
Vermutlich liegt's daran.

Daniel B 12. Apr 2003 13:30

Moin Christian,

Delphi-Quellcode:
  protected
    procedure Change; override;
Delphi-Quellcode:
procedure TRealEdit.Change;
//Tausendertrennzeichen automatisch setzen
var
  iFor: Integer;
begin
  if Length(Text) > 0 then
  begin
    for iFor := 0 to Length(Text) -1 do
    begin
      ;
    end;
  end;
  inherited Change;
end;
Grüsse, Daniel :hi:

Christian Seehase 12. Apr 2003 14:07

Moin Daniel,

das ist allerdings nicht der constructor ;-)

Daniel B 12. Apr 2003 14:12

Moin Christian,

aber das was ich in der Unit eingefügt habe, bevor es kaputt war, den vorher ging es noch und nachdem ich das gepostete eingefügt hatte, bekam ich den Fehler.

Grüsse, Daniel :hi:

PS: Im Anhang die ganze Unit.

Tom 12. Apr 2003 14:19

falsch:
Delphi-Quellcode:
    for iFor := 0 to Length(Text) -1 do
richtig:
Delphi-Quellcode:
    for iFor := 1 to Length(Text) do
Delphi-Quellcode:
...   begin
      Text := Text + '.';
    end;
  end;
1) Was soll das bewirken? Für die Anzahl der Zeichen hänge ein Punkt dahinter?
2) Eine Änderung von Text ruft Change auf. Das ganze ist also eine Endlosschleife.

Daniel B 12. Apr 2003 14:21

Hallo,

hängt Euch jetzt bitte nciht an dem auf was im Change drin steht, ich hab nur irgendwann reingeschrieben. Ich wollte eigentlich nur sehen ob das überhaupt geht da ich zum ersten mal eine Komponente schreibe und einfach nur sehen wollte ob die Prozedur so überhaupt geht.

Ich hab ja auch nciht gefragt ob der Code geht oder nicht!

Grüsse, Daniel :hi:

Tom 12. Apr 2003 14:25

Zitat:

Zitat von Daniel B
Ich hab ja auch nciht gefragt ob der Code geht oder nicht!

Ich glaube eher das ist der Grund warum Du den Thread eröffnest hast. Du solltest über den zweiten Punkt meiner letzten Antwort nachdenken. Der dürfte die Ursache für Dein Problem sein.

Ansonsten sage ich ja schon nichts mehr zu Deinem Quelltext.

Daniel B 12. Apr 2003 14:29

Hallo,
Zitat:

Zitat von Tom
Du solltest über den zweiten Punkt meiner letzten Antwort nachdenken. Der dürfte die Ursache für Dein Problem sein.

Das verstehe ich aber nicht. Diesen Fehler bekomme ich in dem Augenblick wenn ich die Komponente auf Formular setze. Es kommt die Meldung. Und die Komponente lässt sich nicht aufs Formular setzen. Wo passiert denn da bitte ein Change?? Das ist mir Klar.
Oder ist das ein Change wenn ich es aufs Formular setze?

Grüsse, Daniel :hi:

Tom 12. Apr 2003 14:38

Zitat:

Zitat von Daniel B
Diesen Fehler bekomme ich in dem Augenblick wenn ich die Komponente auf Formular setze.

Wenn ich ein einfaches normales TEdit auf eine Form ziehe wird der Text "Edit1" (etc.) gesetzt. Dieses ist eine Änderung des Textes.


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:48 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz