Ganz einfache komponente erstellen?

[NikoMitDaMacht]

Wie kan ich ganz einfach eine ganz einfach komponente erstellen?

Ich habe eine unit die ich jetzt in eine spimple kompo verwandeln !
Bei der komponente sollen einfach noch ein par vars rein die im objectinspector asangezeigt werden
sollen

Kappiert?

Danke schonmal

[LoL]

hi

du musst ne neue komponente von einer anderen ableiten.
tutorials gibts dazu überall schau mal bei google

Beispiel(von TEdit abgeleitet)

Delphi-Quellcode:

unit Edit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Controls, StdCtrls;

type
  TEdit1 = class(TEdit)
  private
    { Private declarations }
    FTest : boolean;
    procedure SetTest(Value : boolean);
  protected
    { Protected declarations }
  public
    { Public declarations }
  published
    { Published declarations }
    property test : boolean Read FTest Write SetNumber;
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Samples', [TEdit1]);
end;

end.

[NikoMitDaMacht]

...Undes soll keine klasse werden !
nuar ähnlich ...z.B.: TExcelApplication ,oder so...

[LoL]

das sagt mir jetzt nix. du willst dir also nur einen eigenen typ schreiben? :gruebel:

[NikoMitDaMacht]

nein nicht ganz ..
Ich will ne kompo um mir den umgang mit der registry zu vereinfachen.
Die eigenschaften sollen zwei strings sein (Key,und nochwas..);

man soll sie mit nem kleinen icon auf die form ziehen

[alcaeus]

Hi Niko,

Zitat:

Zitat von NikoMitDaMacht

...Undes soll keine klasse werden !

dann hast du etwas falsch verstanden. ALLE Komponenten die du in Delphi kennst sind Klassen.
Warum soll es überhaupt keine Klasse werden?

Greetz
alcaeus

[NikoMitDaMacht]

:wiejetzt:

[alcaeus]

Hi Niko,

was genau verstehst du nicht? Du hast gesagt es soll keine Klasse werden. Aber der Titel lautet "Ganz einfache komponente erstellen?". Komponenten sind aber Klassen. Du kannst auch eine Klasse von TObject ableiten, da 2 Properties reingeben, Zugriffsmethoden deklarieren und das wär dann deine Klasse.
Zur Verdeutlichung:

Delphi-Quellcode:

type
  TForm1 = class(TForm)

Das Form einer Anwendung ist eine Klasse.

Delphi-Quellcode:

IniFile := TIniFile.Create(Pfad);

Willst du auf ein IniFile zugreifen brauchst du eine Klasse

Delphi-Quellcode:

Registry := TRegistry.Create;

Auch für die Registry gibts eine Klasse.

Greetz
alcaeus

[Muetze1]

Moin!

Er sucht anscheinend eine nicht-visuelle Komponente die einfach nur ein Icon im Designmodus zeigt und zur Laufzeit nicht verfügbar ist. (wie z.B. OpenDialog, SaveDialog, TActionsList, etc)

MfG
Muetze1

[NikoMitDaMacht]

Genau
Und wie geht das jetzt?

[LoL]

komponenten erstellen oder nicht visuelle komponenten erstellen?

[JasonDX]

hier gibts ein gutes tut dafür.
wenn du eine nicht visuelle komponente erstellen willst, brauchst du immernoch 'ne klasse, leitest sie aber von TComponent ab. Wenn du eine visuelle möchtest, dann müsstest du sie von TWinControl oder einer Kompo drunter ableiten!
Nur von TComponent abgeleitet kriegst du so'n kleines quadratisches feld (und kannst auchnoch dein Icon draufsetzen ;) )

[woki]

Zitat:

Zitat von NikoMitDaMacht

Genau
Und wie geht das jetzt?

Delphi Menü:

Komponente|Neue Komponente,

als Vorfahrtyp TComponent auswählen ...

und ab gehts

ciao
Woki

[NikoMitDaMacht]

Ich will dem nach eine Nicht-Visuelle Kompo.

Also so,oder?:

Delphi-Quellcode:

 uses
  Windows, Messages, SysUtils, Classes, Controls, StdCtrls;

type
  TReg = class(TComponent)
  private
    { Private declarations }
    FTest : boolean;
    procedure SetTest(Value : boolean);
  protected
    { Protected declarations }
  public
    { Public declarations }
  published
    { Published declarations }
    property test : boolean Read FTest Write SetNumber;
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Samples', [TEinfachReg]);
end;

end.

[NikoMitDaMacht]

Danke ich glaub ich raffs jetzt!