Probleme mit Datentypen

Anfängerfragen zum Programmieren mit PureBasic.
HoDam
Beiträge: 82
Registriert: 19.11.2004 13:57
Wohnort: Köln, Cologne

Probleme mit Datentypen

Beitrag von HoDam »

So habe mir jetzt die Vollversion zugelegt und hoffe damit kleiner Tools schreiben zu können.

Ich habe folgendes Problem:

Aus einer anderen Anwendung heraus wird eine Textdatei erzeugt, die zum Beispiel nur mit einem Zeichen gefüllt is (1,2,3).

Dieses Zeichen möchte ich auslesen und in eine Variable schreiben. Bis dahin funktioniert alles.

Jetzt möchte ich diese Variable vergleichen mit Inhalten einer weiteren Textdatei (INI-File).
Dort habe ich eine Sektions oder Gruppe definiert

[Programme]
1= "Pfadangabe1+Programm1"
2= "Pfadangabe2+Programm2"
3= "Pfadangabe3+Programm3"

Ziel ist es das er die Applikation starten die ihm als Zahlenwert oder String ( in meinem Beispiel 1,2,3 ) übergeben wird.


Die Zahlen habe ich jetzt zur Vereinfachung gewählt.

Lässt sich eine andere Applikation aus PureBasic heraus starten?

Danke für eure Hilfe
HoDam
Beiträge: 82
Registriert: 19.11.2004 13:57
Wohnort: Köln, Cologne

Beitrag von HoDam »

Ok, ein teil kann ich selber beantworten.

Externe Programme starten funktioniert mit dem Befehl RunProgram()

Nur wie übergebe ich den String (Pfadangabe+Program) die in der "INI-Datei" hinterlegt sind.
HoDam
Beiträge: 82
Registriert: 19.11.2004 13:57
Wohnort: Köln, Cologne

Beitrag von HoDam »

So habe das Problem selber gelöst:
Falls es jemanden interessiert:

Code: Alles auswählen

Dateioffen=OpenFile(0,"C:\Programme\ProgramX\datei.txt") 
Applx$ = ReadString()
INIFile = OpenPreferences("C:\Programme\Prgram2\konfig.ini")
PreferenceGroup("Programs")
Appl$ =ReadPreferenceString (Applx$,"")
MessageRequester("ja/nein",Appl$,0)
RunProgram(Appl$)
Edit by Kiffi: Code-Tags gesetzt
Benutzeravatar
Kiffi
Beiträge: 10714
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Beitrag von Kiffi »

ein paar kleine Anmerkungen:
HoDam hat geschrieben:

Code: Alles auswählen

Dateioffen=OpenFile(0,"C:\Programme\ProgramX\datei.txt") 
Wenn Du auf eine bestehende Datei zugreifen möchtest, dann verwendet
lieber ReadFile(). OpenFile() legt eine Datei an, falls sie nicht vorhanden
sein sollte.

Ebenso solltest Du den Rückgabe aus ReadFile() auswerten und nach dem
ReadFile() die Datei ordnungsgemäß mit CloseFile() wieder schliessen

Code: Alles auswählen

FF=ReadFile(#PB_Any,"C:\Programme\ProgramX\datei.txt") 
If FF
 [...]
 CloseFile(FF)
EndIf
Grüße ... Kiffi
Antworten