Textimport und export

[Perlsau]

Da würd' ich aber erstmal den Rechner wieder flott machen, bevor ich weiter programmiere ... Wie willst du programmieren, wenn du, wie du sagt, kaum noch eine Anwendung öffnen kannst?

[bennySB]

Ach es geht schon halbwegs^^ Compalieren und die *.exe starten geht noch. Ich kann nur mein installiertes Programm nicht starten aber das ist momentan auch gar nicht so wichtig^^

Aber wo ich gerade mal dabei bin hier zu schreiben, vielleicht könnte ihr mir nen gedanklichen Anstoß geben.
Ich habe auf einer WizardPage nun eine zusätzliche Verzeichnisauswahl eingefügt und eine CheckBox, nun will ich beides miteinander Verbinden.
Soll heißen: CheckBox aktiviert: 2.Verzeichnisauswahl einblenden, Checkbox nicht aktiviert: 2. Verzeichnisauwahl ausblenden.

Die erste Verzeichnisauswahl bleibt unangetastet. Anbei mein momentaner Code dafür:

Delphi-Quellcode:

var

    UserDirPageCAE : TInputDirWizardPage;    
    UserFolderCAE, UserFolderGPS : string;
    GPSVerzeichnisVisible : boolean;
    DOSBoxConf : TStringList;
    GPSDirCheckBox: TNewCheckBox;



    function InitializeSetup: boolean;

      begin
        UserFolderCAE := '';
        Result := true;
      end;

    function InstallCae(Param:String):String;

      begin
        Result := UserDirPageCAE.Values[0];
      end;

    function GPSDir(Param:String):String;

      begin
        Result := UserDirPageCAE.Values[1];
      end;

    procedure InitializeWizard;

      begin
      UserDirPageCAE := CreateInputDirPage(wpSelectDir,
      ExpandConstant('{cm:CAEVerzeichnis}'),
      ExpandConstant('{cm:SpeicherortPRTDEF}'),
      ExpandConstant('{cm:SpeicherzielPRTDEF}'),
      false,
      'Neuer Ordner');


      //CAE-Verzeichnisauswahlfenster
      UserDirPageCAE.Add('CAE2000.EXE Verzeichnis');
      //GPS-Verzeichnisauswahlfenster
      UserDirPageCAE.Add('GPS-Ordner Verzeichnis');


      //CAE-Standardpfad in der Verzeichnisauswahl
      UserDirPageCAE.Values[0] := ExpandConstant(
      'C:\CAE2000\');
      
      //GPS-Standardpfad in der Verzeichnisauswahl
      UserDirPageCAE.Values[1] := ExpandConstant(
      'C:\'); 
      
      GPSDirCheckBox := TNewCheckBox.Create(UserDirPageCAE);
      
      with GPSDirCheckBox do      //Parameter für die GPS-CheckBox
        begin
       
          GPSDirCheckBox.Parent := UserDirPageCAE.Surface;
          Caption := ExpandConstant('{cm:GPSVerzeichnis}');
          Left := ScaleX(0);
          Top := ScaleY(120);
          Width := ScaleX(400);
          Height := ScaleY(40);
          Checked := GPSVerzeichnisVisible;
          Visible := true;
        end;
      end;

[bennySB]

Meine Überlegung jetzt war gerade es so zu realisieren

Delphi-Quellcode:

      begin
      if GPSVerzeichnisVisible=true then
        
        begin
          
          //GPS-Verzeichnisauswahlfenster 
          UserDirPageCAE.Add('GPS-Ordner Verzeichnis');
          
          //GPS-Standardpfad in der Verzeichnisauswahl
          UserDirPageCAE.Values[1] := ExpandConstant(
          'C:\'); 
        end;
      end;

Jedoch kann ich mit dem ändern von true zu false die Verzeichnisauswahl nur ein oder ausblenden beim ersten starten.
Jedoch wird das Fenster nicht ein oder ausgeblendet wenn ich im Setup die Checkbox betätige.

Hmm wie kann ich das dynamisch machen oder sollte dazu lieber einen extra Post eröffnen?

[Sir Rufo]

Also wenn deine Konfigurationsdatei die ist, die hier beschrieben ist, dann ist das eine INI-Datei (ja, auch wenn die Erweiterung nicht .ini ist).

Somit ist dein (entschuldige bitte) "Gehampel" einfach nur zum Schreien.

Der Hinweis zum Thema INI-Datei ist hier auch schon gefallen, aber du hast darauf nicht wirklich reagiert.
Warum du die conf-Datei nicht angehängt hast, bleibt auch ein Rätsel, denn damit wäre die Diskussion nach 3 Beiträgen durch gewesen

[bennySB]

Naja die Funktion "INI" habe ich mir schon angeschaut, nur ist dort das Problem das die Zuweisung von Key zu String immer mit einem "=" verbunden wird und solange dieses nicht zu entfernen ist kann ich diese Lösung nicht nutzen, zudem habe ich ja auch eine Funktionierende Variante mit der Hilfe hier nun erstellt^^

Aber ich kann auch gerne die *.conf Datei mal eben anhängen. (nicht wundern ich habe sie nur zum Hochladen in eine *.txt abgeändert)

[DeddyH]

Sir Rufo hat Recht, das ist das ganz normale Ini-Format.

Code:

[Abschnitt]
Schlüssel=Wert

Mit TIniFile würde man das so anlegen können:
IniVariable.WriteString('Abschnitt', 'Schlüssel', 'Wert'); Und fertig ist der Lack.

[bennySB]

Naja aber wie gesagt mit baumina´s Hilfe läuft es ja jetzt auch und sorry wenn es so rüber kommt als wolle ich fertige Lösungen haben das soll natürlich nicht so sein.
Mit der onClick Sache das werde ich mir mal nun noch anschauen. Ich hatte wirklich gedacht das man die Checked Variable nehmen kann da diese ja ein boolean ist und man somit ne einfache true, false Abfrage starten könnte, aber das dies nicht dynamisch zu sein scheint bleibt nun halt die onClick Sache noch übrig^^

Ps. Ich will hier niemanden irgendwie verärgern oder so, bin nur halt noch im Larvenstadium was Delphi angeht^^

[Sir Rufo]

Zitat von bennySB:

Naja die Funktion "INI" habe ich mir schon angeschaut, nur ist dort das Problem das die Zuweisung von Key zu String immer mit einem "=" verbunden wird und solange dieses nicht zu entfernen ist kann ich diese Lösung nicht nutzen, zudem habe ich ja auch eine Funktionierende Variante mit der Hilfe hier nun erstellt^^

Aber ich kann auch gerne die *.conf Datei mal eben anhängen. (nicht wundern ich habe sie nur zum Hochladen in eine *.txt abgeändert)

Aha, also eine INI sieht so aus

Code:

[section]
key=value

und deine CONF sieht so aus

Code:

[section]
key=value

Auszug aus der CONF Datei

Code:

[sdl]
fullscreen=true
fulldouble=true
fullresolution=original
windowresolution=desktop
output=surface
autolock=true
sensitivity=200
waitonerror=true
priority=higher,higher
mapperfile=mapper-SVN_MB6.map
usescancodes=false

Stimmt, die sind total anders und da kann man mit INI wohl nichts machen

Falls du dir es anders überlegst, dann schaust du mal in der InnoSetup-Doku nach
http://www.jrsoftware.org/ishelp/ind...pic=inisection

[bennySB]

Zitat von Sir Rufo:

Zitat von bennySB:

Naja die Funktion "INI" habe ich mir schon angeschaut, nur ist dort das Problem das die Zuweisung von Key zu String immer mit einem "=" verbunden wird und solange dieses nicht zu entfernen ist kann ich diese Lösung nicht nutzen, zudem habe ich ja auch eine Funktionierende Variante mit der Hilfe hier nun erstellt^^

Aber ich kann auch gerne die *.conf Datei mal eben anhängen. (nicht wundern ich habe sie nur zum Hochladen in eine *.txt abgeändert)

Aha, also eine INI sieht so aus

Code:

[section]
key=value

und deine CONF sieht so aus

Code:

[section]
key=value

Auszug aus der CONF Datei

Code:

[sdl]
fullscreen=true
fulldouble=true
fullresolution=original
windowresolution=desktop
output=surface
autolock=true
sensitivity=200
waitonerror=true
priority=higher,higher
mapperfile=mapper-SVN_MB6.map
usescancodes=false

Stimmt, die sind total anders und da kann man mit INI wohl nichts machen

Falls du dir es anders überlegst, dann schaust du mal in der InnoSetup-Doku nach
http://www.jrsoftware.org/ishelp/ind...pic=inisection

Sorry das ich nun etwas abfallender werde, aber wenn du schon mit solchen Kommentaren kommen willst dann lies dir erstmal genau durch was ich überhaupt haben und machen will. ich habe die genauen Positionen genannt an denen ich arbeiten muss und dort sind keine "=" vorhanden und auch nicht zulässig.
Also bitte erst informieren und dann klotzen.

[baumina]

Zitat von bennySB:

in die richtige Richtung werfen ... gedanklichen Anstoß geben ...

Ich habe eher den Eindruck, dass wir dir hier ständig einen fertigen Code präsentieren sollen. Ein letzter Gedankenanstoß wäre : Ereignis onClick

Und das "=" in einer ini ist einfach durch Values und Names zu trennen.

Edit: bzw. ist ein readstring/writestring