Gibts ein Delphitool mit dem man Komponenten tauschen kann?

bms · Verfasst: Sa 01.05.04 18:56

Ein Beispiel: ich hab ein Delphiprogramm mit den standard Komponenten geschrieben. Nun hab ich mir paar optisch schöne Komponenten besorgt und möchte sie gegen die alten tauschen. Eigentlich eine Fummelsarbeit.

Kennt wer ein Tool das das für einen erledigt? Evtl. noch mit Fehlermeldungen, wenn eine Komponente nicht die benötigten Eigenschaften besitzt. Gibts sowas?

Naturlich kann man ein mal es selbst machen, aber es geht um etliche Programme.

_________________
VORSICHT: Ich behersche seit heute die Fünf-Finger-Handflächen-Herz-Explodier-Schlag-Kampf-Technik >

toms · Beiträge: 1099 Erhaltene Danke: 2

Hi,

Bei GeExperts (www.gexperts.org/ ) gibt's eine "ReplaceComponents..." Funktion.

KidPaddle · Beiträge: 351 WinXP,Linux D7 Prof, XE7

Sofern deine DFM's als Text - DFM's gespeichert sind, kannst Du mit jedem beliebigen Editor, welcher ein suchen und ersetzen in Dateien eines Verzeichnisses ermöglicht, machen.

Gruß
KidPaddle

Karlson · Beiträge: 2088

SuiPack (torry) kann das ebenfalls und ändert alles automatisch in die Komponenten im Linux, MacOS oder Win XP style. Leider musst du ein Popup hinnehmen es sei denn du kaufst das Pack.

sakura · Verfasst: Di 04.05.04 13:14

KidPaddle hat folgendes geschrieben:

Sofern deine DFM's als Text - DFM's gespeichert sind, kannst Du mit jedem beliebigen Editor, welcher ein suchen und ersetzen in Dateien eines Verzeichnisses ermöglicht, machen.

Nicht zu vergessen sind die .pas Dateien, da dort die Komponententypen auch genannt sind

_________________
Das Lächeln ist die eleganteste Art dem Gegner die Zähne zu zeigen.
Borland SE

Gast Erhaltene Danke: 1

Alternativ geht's auch so: (Hier ein Beispiel um TButton in TLabel umzuwandeln)
Ist zwar nicht gerade die eleganteste Methode... :P

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

uses
 StdCtrls;

type
 TButton = class(TLabel)
 private
  FTabOrder: integer;
  procedure SetTabOrder(const Value: integer);
 published
  property TabOrder: integer read FTabOrder write FTabOrder; // Fehlende Property hinzufügen
 end;

Dann eben als letztes (oder zumindest hinter der Originalunit) einbinden.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme