Hi,

ich habe wieder einmal eine Frage! Und zwar will ich TStringGrid um ein paar Propertys erweitern.

Dazu kann man es ja so machen:
TStringGrid = class(Grids.TStringGrid) Nun habe ich aber ein Problem:
Die Definition von TStringGrid ist in der Unit uGlobal. die uGlobal bindet die Grids Unit in den Uses mit ein.
Meine Form hat ein TStringGrid drauf. Wenn ich nun die Unit Grids aus den Uses der uMain nehme schreibt mir Delphi beim Speichern immer wieder die Grids Unit dazu.

Somit sagt der Compiler natürlich Grids.TStringGrid <> uGlobal.TStringGrid.
Ich brauche die TStringgrid aber in mehreren Units.
Oder muss man da in jeder Unit dann TStringGrid neu definieren?

Binde deine Unit vor der Grids unit ein

Zitat von mkinzler:

Binde deine Unit vor der Grids unit ein

Du meinst nach, oder?

@uligerhardt Wars nicht so, dass die definition(fals doppelt) von der ersten Unit genommen werden?

Zitat von Memnarch:

@uligerhardt Wars nicht so, dass die definition(fals doppelt) von der ersten Unit genommen werden?

Nö, von der letzten. So geht's:

markieren

Delphi-Quellcode:

uses
  Windows,
  Graphics;

begin
  Writeln(TBitmap.ClassName);
end.

und das

markieren

Delphi-Quellcode:

uses
  Graphics,
  Windows;

begin
  Writeln(TBitmap.ClassName);
end.

gibt nen Compilerfehler.

Verdammt!

So einfach! Hätte ich auch noch draufkommen können!

Vielen Dank an alle, werd's morgen mal probieren!
Derzeit habe ich es halt in der uMain definiert und diese in den anderen Units unter den Uses hinzugefügt. Geht auch, aber macht es schwierig mit den Referenzen untereinander.

Wenn du das auf dein Form ziehen willst,
musst deine eigene Komponente machen:
Sieh dir doch mal das Tutorial zur Komponentenentwicklung auf DelphiGL an.
Die muss dann aber einen anderen Namen haben als TStringGrid ->TYourStringGrid