ich möchte wie in diesem Beitrag auch schon angesprochen: http://www.c-plusplus.net/forum/viewtopic-var-t-is-39306.html Dateien mit dem Windows Contextmenü "Öffnen mit" von meinem Programm öffnen lassen.

Da die Dateiart einem anderen Programm zugewiesen ist, soll hier nicht einen Voreinstellung auf mein Programm gemacht werden.
Mir reicht einfaches anklicken von "Öffnen mit".
Wenn ich zZ "Öffnen mit" klicke öffnet sich zwar mein Programm, allerdings wird die Datei nicht eingelsen und angezeigt. Das Formular bleibt leer!
Ausserdem startet sich mein Programm bei jedem "Öffen mit", so das ich am Ende x offene und leere Versionen meines Programmes habe...
Aus dem obigen Thread habe ich die zuletzt beschriebene if-Anweisung eingefügt in der Hoffnung, dass sie etwas bewirkt (ja ich weiß - das ist totaler Blödsinn).

__fastcall TFormMain::TFormMain(TComponent* Owner)
        : TForm(Owner)
{
  if (ParamStr(1) != "")
    OpenHandle(ParamStr(1));
}

Beim öffnen erhalte ich dann die Meldung "Datei untitled.poe kann nicht geöffnet werden". untitled.poe ist die Voreinstellung meines Öffnendialoges. Die Öffnen-Funktion sieht so aus:

void __fastcall TFormMain::OpenHandle(String openFileName)
{
tmpList->LoadFromFile(OpenDialog1->FileName); //wobei tmpList eine Stringliste ist

.

kurze Beschreibung meines bisheringen Öffnens:
Mein Programm erzeugt beim Öffnen (Öffnendialog im Programm) zur Laufzeit dynamisch RichEdits in das die Dateiinhalte geschrieben werden. Um es weiter zu komplizieren liegen diese RichEdits auf Seiten der Komponente PageControl, welche auch dynamisch erzeugt werden. Das alles funktioniert schon. Wer nun verwirrt ist kann sich das Programm ja mal angucken: http://www.PLCEdit.de.vu (Installer 582kB).
Meine Öffnenfunktion sieht folgendermaßen aus:

void __fastcall TFormMain::Oeffnen1Click(TObject *Sender)
{
if (OpenDialog1->Execute())
  OpenHandle(OpenDialog1->FileName);
} //Menu Open mit dem Funktionsaufruf OpenHandle der dann folgend die Datei einliest -->
void __fastcall TFormMain::OpenHandle(String openFileName)
{
tmpList->LoadFromFile(OpenDialog1->FileName);
} //Öffnen in separater Funktion, da von Oeffnen1 und von TForm(Owner) aufgerufen

. Der Rest ist das Handling für die Erzeugung einer neuen PageControlseite + der RichEdits auf ihr (tmpList ist eine einfache Stringliste). Daher kein ellenlanger Quellcode zum Öffnendialog von mir, sondern nur der unten stehende Ablauf:

Öffnendialog, Dateiinhalt in Strinliste laden --> Routine für die neue Seite + RichEdits im PageControl 
--> Routine zum füllen der RichEdits mit Dateiinhalt. --> zerstören der Stringliste

Gibt es uU eine Einstellung, die man der Form oder dem Öffnendialog tätigen kann, damit das windowsinterne "Öffnen mit" funktioniert?
Ich möchte dazu erreichen, dass bei einem "Öffnen mit" nicht eine neue Instanz meines Programmes gestartet wird sondern die Datei auf einer neuen PageControl Seite geöffnet wird. Hierzu würde dann ja sicher reichen auf die vorhandene Routine der dynamischen Seitenerstellung zuzugreifen.

Krönung wäre eine Drag&Drop Funktion, also dass ich eine Datei auf mein Programm ziehe und sich diese im Programm auf einer neuen Seite öffnet. Hierbei wäre es vlt. problematisch, wenn ich die Datei auf ein RichEdit ziehe, ich aber für die Datei eine neue PageControl Seite mit RichEdit öffnen möchte.

Danke für eure Mühe im Voraus.

MfG Martin

Die Drag & Drop Funktion ist wirklich sehr schön.
Falls irgendwann mal jemand diesen Thread findet, man kann statt der ListBox auch bspw. die Form Main eintragen. Macht sich gut,wenn man viele Objekte hat, die kein Handle haben:

DragAcceptFiles(FormMain -> Handle, true); //WM_DropFiles

Die "Öffnen mit" Funktionalität hat eine neue Qualität erreicht:
Ich hatte zufällig in meiner Funktion

void __fastcall TFormMain::OpenHandle(String openFileName) 
//noch ein 
LoadFromFile(OpenDialog1->FileName) //drin, statt dem 
LoadFromFile(openFileName)

... daher auch die Message mit der untitled.poe (siehe 1. Posting).

Nun bekomme ich den Fehler "EAccess Violation", wenn ich einen Datei mit dem Contextmenü "Öffnen mit" in meinem Programm öffnen will.
Laut der Borland Hilfe handelt es sich um einen ungültigen Speicherzugriff.
Ich habe die Routine

if (ParamStr(1) != "")
    OpenHandle(ParamStr(1));

nun in das Ereignis OnActivate meiner FormMain geschrieben. Frage mich aber wo das Problem ist, wenn Du (Jansen) doch in dem o.g. Thread

__fastcall TForm1::TForm1(TComponent* Owner) 
  : TForm(Owner) 
//...

vorschlägst.
Naja, jedenfalls funktionierts erst mal so wie ich es mir gewünscht hatte, danke.

MfG Martin

MfG Martin