Fehler beim Komponenteninstallieren

[Tommy1988]

Ich habe eine Komponente namens 7Split.

Ich möchte die Kompilieren aber ich erhalte den Fehler, dass VCL30 benötigt wird aber nicht gefunden werden kann.

Im Anhang der Code:

Edit:
Ok. erstes problem gelöst (hab die Requires rausgenommen und Delphi hat sich die selber geholt, die die richtig sind.)
Jetzt ist das problem beim Kompilieren von DclFileSplitterPackage.dpk.

Da wird auch vcl30 benötigt (das problem kann ich umgehen)
Aber dann braucht der noch
"DsgnIntf.dcu"
[Fataler Fehler] FileSplitterReg.pas(10): F1026 Datei nicht gefunden: 'DsgnIntf.dcu'
was ich nicht habe :?

[mkinzler]

Öffne das Package und werfe VCL30 uad requires raus. Die richtige Version wird dann automatisch ergänzt.

[DeddyH]

Zur DsgnIntf schau mal hier

[DP-Maintenance]

Dieses Thema wurde von "Matze" von "Die Delphi-IDE" nach "Sonstige Fragen zu Delphi" verschoben.
Es geht nicht um die IDE selbst.

[Tommy1988]

"http://www.delphipraxis.net/internal_redirect.php?t=38873&highlight=designintf +dcu"

genau das habe ich vorher auch gefunden =)

Das Problem dabei jedoch ist, dass ich wahrscheinlich nicht diesen Pfad hier eintragen kann:
"C:\Programme\Borland\Delphi7\Source\ToolsAPI"
Weil ich habe ja Delphi 2005 PE

[DeddyH]

:wiejetzt: Wieso nicht?

[Tommy1988]

:-D wie hä wie jetzt ?! :)

Der Ordner existiert bei mir nicht.

[DeddyH]

Lassen sich denn da überhaupt Komponenten installieren? Falls ja, musst Du den Pfad natürlich anpassen (Delphi7 passt ja nicht).

[Tommy1988]

Klar lassen sich da welche installieren =)

Den Pfad anpassen bringt nix, wenn ich habe weder den Ordner Source noch ToolsAPI

[DeddyH]

Dann such doch mal, wo sich die DesignIntf.dcu befindet (die sollte aber schon da sein).

[Tommy1988]

Die Suche ist abgeschlossen. Es liegen keine Ergebnisse vor =)

DesignIntf.dcu nicht gefunden
DesignIntf.pas nicht gefunden
DesignIntf.* nicht gefunden

[mkinzler]

Versuche mal DesignIde.dcp einzubinden.

[DeddyH]

Dann weiß ich auch nicht weiter, habe kein Delphi 2005 PE zur Hand. :(

[Tommy1988]

Ahaaaa... die gibts. Was kann ich jetzt weiter damit machen?

[mkinzler]

Dieses unter requires einbinden.

[Tommy1988]

geht leider so einfach nicht. Ich kann das nicht erklären, dafür müsste man sich die Komponente mal ansehen.

DesignIde unter Requires eingetragen,
Dann kommt bei FileSplitterReg
"[Fataler Fehler] FileSplitterReg.pas(10): F1026 Datei nicht gefunden: 'DsgnIntf.dcu'"
(

Delphi-Quellcode:

uses
  Classes, FileSplitter, DsgnIntf, SysUtils, FileSplitterEdit;

)
Wenn ich da auch DesignIDE eintrage kommt woanders wieder ein Fehler..

[mkinzler]

uses ist wohl was anderes als requires oder?

[Tommy1988]

Ja, das ist mir auch klar. Aber ich kann nicht einfach das DesignIntF aus Uses rausnehmen.

[DeddyH]

Aber umbenennen. Hast Du den Artikel in meinem Link nicht gelesen?

[Tommy1988]

Doch habe ich =)

Ich habe jetzt mal aus

Delphi-Quellcode:

uses
  Classes, FileSplitter, DesignIntF, SysUtils, FileSplitterEdit;

das gemacht

Delphi-Quellcode:

uses
  Classes, FileSplitter, DesignIDE, SysUtils, FileSplitterEdit;

Dann kommt aber das von mir angesprochende Problem:
[Fataler Fehler] FileSplitterReg.pas(10): F1026 Datei nicht gefunden: 'DesignIDE.dcu'

[Tommy1988]

Ich glaube ich habe den Fehler gefunden.

Es wurde vergessen eine weitere Unit einzubinden die erforderlich war.

In genau DIESER Unit musste dann DsgnIntf in DesignIntf und DesignEditors
umbenannt werden.

[Tommy1988]

Ich weis nicht obs jetzt auch hierhin gehört:

Aber: Dieses Splutprogramm hat einen Fehler den ich soweit beseitigt habe:
Will man eine Datei zusammenfügen, so wird sie mit der Dateiendung XXX gespeichert.

Ich habe die Dateiendung der "noch guten" Datei via Record in eine Datei gespeichert.
Diese IM PROGRAMM SELBST auszulesen ist kein Problem
Es sind die ersten 3 Zeichen in der Datei:

Delphi-Quellcode:

Ex := copy(ExString, 0, 3);

Ok.
Dass die Datei mit XXX gespeichert wird, steht in einer anderen Unit (FileSplitter.pas von der Komponente)

Wie kann ich dieses Problem lösen?
Die wichtigen zeilen in dieser Unit sind:

Delphi-Quellcode:

begin
  if FileExists(FSplitFileName) then
  begin
    { Make sure the filename is correct }
    if FFileName = '' then
      FFileName := ChangeFileExt(FSplitFileName, 'XXX'); // Hier müsste der Inhalt von "Ex" rein