Einzelnen Beitrag anzeigen

Benutzerbild von richie
richie

Registriert seit: 21. Apr 2006
Ort: Dresden
127 Beiträge
 
#12

Re: Datei automatisch anzeigen lassen

  Alt 23. Apr 2006, 12:53
ichbins:

hab das jetzt so gelöst:

Delphi-Quellcode:
procedure TWinForm.TWinForm_Load(sender: System.Object; e: System.EventArgs);
var
  PrmStr : integer;
begin
  RichTextBox1.Clear;
  if Borland.Delphi.System.ParamStr(1) = 'then //Testen ob mittels Datei geöffnet wird
  begin //wenn nicht, ein paar Initalisierungen
    SaveFileName := '';
    OpenFileName := '';
    MenuItemRedo.Enabled := false;
    MenuItemUndo.Enabled := false;
  end
  else //sonst Dateipfad lesen
  begin
    PrmStr := 1;
    OpenFileName := '';
    repeat
        OpenFileName := Borland.Delphi.System.ParamStr(PrmStr) + ' ';
        PrmStr := PrmStr + 1;
    until Borland.Delphi.System.ParamStr(PrmStr) = '';
    RichTextBox1.LoadFile(OpenFileName); //öffnen
  end;
end;
Ist das so gut gelöst?

Bei den Projektoptionen könnte man einen Titel eingeben, dass ist aber irgendwie deaktiviert.


phistev:

1. Ich hab keine Ahnung von der Registry. Kann ich das da einfach löschen?

2. Was für eine Zuordnung meinst du?
Robert
  Mit Zitat antworten Zitat