Wie kann ich durchs Öffnen Mit Daten ins Memo laden...

[Nico1]

wie kann ich zum beisspiel wenn ich auf eine txt Datei rechtsklicke und mein Programm als öffnen mit Tool verwende die TXT datei ins Memo laden?

[Jens Schumann]

Hallo,
schau mal in der OH unter ParamStr nach.

[Nico1]

Ach verdammt... ich hab schon was gefunden aber ich ... es ist nicht so wie ichs wollte...


Rechtsklicken auf die Datei(TXT zb.) Öffnen mit --> MEINTOOL --> Txt ins Memo1 Laden!

Bitte schick mir nen genauen Links wär sehr nett

Danke im Voraus...

[Jens Schumann]

Hallo Nico1,
was möchtest Du denn?

1. Wenn man eine Datei, deren Pfad und Dateiname beim Start der Anwendung als Paramter übergeben werden, öffnet.

2. Wie mach ich es damit meine Anwendung unter Öffnen mit erscheint

3. 1. und 2.

???

[Nico1]

glaube ) beides .....



ich will das mein Programm im Öffnen mit erscheint UND das ich dann über öffnen mit eine Txt Datei ins mein Memo einladen kann!



hmm... kennt wer irgendein Tutorial für Registry einträge?!

.... Danke

[Nico1]

ich will mit einem rechtsklick auf zb ne Textdatei mein Programm beim Öffnen mit dialog sehen . Dann soll in ein Richedit die TXT dati reingeladen werden

BITTE HELFT MIR ICH BRAUCH DAS SEHR SEHR DRINGEND(Publisherdruck)

[Die Muhkuh]

Den Code zum öffnen kann ich dir geben:

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
var
  I : Integer;
begin
  if ParamCount > 0 then
  begin
    if ParamStr(1)[1] <> '\' then      // Dateiname übergeben --> öffnen
    begin
      for i := 1 to ParamCount do
      begin
        Application.CreateForm(TForm2, Form2);
        <Hier kommt dein Richedit hin>.Lines.LoadFromFile(ParamStr(I));
      end;
    end;
  end;
end;

[Nico1]

danke das ist mal ein Teil des Problems :-D


aber hat wer den "kompletten" ? bin sehr anspruchvoll ;)


... und warum Form2 ist das weils kopiert wurde? geht nur wenn ichs durch TForm1, Form1 ersetze

[Alexander]

Das mit dem CreateForm kannst du eigentlich wegmachen...

Zum anderen Problem: Such hier mal, dann wirst du bestimmt auch fündig :-)

[Die Muhkuh]

Achso,

ja das CreateForm kannst du weglassen.

[yankee]

Jo, hier mal eine Kleine Einführung ins registry-Gedöne:
Ist ganz einfach:

Oben in die Uses trägst du Registry ein.
In der entsprechenden Prozedur deklarierst du eine Variable des Typs TRegistry
So sieht das dann aus:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var reg:TRegistry;
begin
  reg:=TRegistry.Create;
  reg.RootKey:= //Der ROOT-Key, z.b.: HKEY_LOCAL_MACHINE;
  reg.OpenKey('{Hier dann das Unterverzeichnis}', True); //Bei True wird der Key erzeugt, wenn er nicht schon existiert
  reg.writestring('{Name des Wertes}','{Wert}'); //Es gibt auch writeint, writebool usw.
  reg.free; //unbedingt den Speicher wieder freigeben.

[SirThornberry]

ich würde den code zum laden ins memo ins FormCreate machen, ansonsten wird jedesmal ins Memo geladen wenn form.show aufgerufen wird

[Die Muhkuh]

Dann halt ins Form.Create!

[fkerber]

Hi!

Sollte um die Sache mit der Registry nicht besser noch ein

Delphi-Quellcode:

try 
...
finally

Ciao fkerber

[Christian Seehase]

Moin yankee,

nicht zu vergessen die Resourcenschutzblöcke, Reg.CloseKey und der Hinweis, dass man vor allem in HKEY_LOCAL_MACHINE tunlichst nicht schreiben sollte (OpenKey(...,true)), da dies unter W2K/XP nur mit administrativen Berechtigungen geht ;-)

[Nico1]

vielen dank ... ;)


aber ich komm net ganz zurecht damit(ich werd ja erst 15 ;) ) könnte mir das jetzt mal wer bitte als kompleten code schreiben ich bin zu umm dafür



--> RicheditFeld = "Text"

--> Programm = Easy Html


--> rechtsklick auf ne Datei Öfnen mit --> EASY HTML --> Textdatei ins "Text" laden.


DANKE schonmal! wäre wirklich toll wenn ich das heute noch schaffen könnte!!

[Nico1]

vielen Dank ... ;)


aber ich komm net ganz zurecht damit(ich werd ja erst 15 ;) ) könnte mir das jetzt mal wer bitte als kompleten code schreiben ich bin zu umm dafür



--> RicheditFeld = "Text"

--> Programm = Easy Html


--> rechtsklick auf ne Datei Öfnen mit --> EASY HTML --> Textdatei ins "Text" laden.

[Nico1]

Okay jetzt hab ich ne neue frage durch nen Code von DS hab ich einen eigenen Dateitypen gemacht .. wie kann ich nun für .eht dateien ein einheitliches Symbol festlegen?


wenn ich jetzt auf ne .eht datei klicke solls mir die Daten der Datei(nur TXT) ins memo laden wie mach ich das denn ?

[Nico1]

Danke geht jetzt alles!