Sprachumstellung

Anfängerfragen zum Programmieren mit PureBasic.
pogi02
Beiträge: 131
Registriert: 30.10.2004 00:52
Wohnort: Österreich
Kontaktdaten:

Beitrag von pogi02 »

Naja das mit den Arrays ist auch ne möglichkeit aber bei grösseren programmen ist sicher die lösung mit den dateien besser
MfG pogi02

- www.apware.net
Aktuelles Projekt:
-
Benutzeravatar
bobobo
jaAdmin
Beiträge: 3873
Registriert: 13.09.2004 17:48
Kontaktdaten:

Beitrag von bobobo »

HoDam hat geschrieben:Ein Frage zur Sprachenerkennung.

Warum Loc und User abfragen.
Ist denn nicht immer loc=user?
user ist sicher am sinnvollsten .. wollte auch nur die Möglichkeiten aufzeigen.
‮pb aktuel 6.2 windoof aktuell und sowas von 10
Ich hab Tinnitus im Auge. Ich seh nur Pfeifen.
Benutzeravatar
bobobo
jaAdmin
Beiträge: 3873
Registriert: 13.09.2004 17:48
Kontaktdaten:

Beitrag von bobobo »

pogi02 hat geschrieben:Naja das mit den Arrays ist auch ne möglichkeit aber bei grösseren programmen ist sicher die lösung mit den dateien besser
besser änderbar ist das auf jeden Fall .. auch nach ProgrammKompilation
‮pb aktuel 6.2 windoof aktuell und sowas von 10
Ich hab Tinnitus im Auge. Ich seh nur Pfeifen.
Benutzeravatar
Kiffi
Beiträge: 10714
Registriert: 08.09.2004 08:21
Wohnort: Amphibios 9

Beitrag von Kiffi »

weil's immer wieder gepostet wird und weil's immer wieder Probleme macht:

Code: Alles auswählen

If sprache="deutsch"
  Openfile (0, "deutsch.txt")
Else 
  Openfile (0, "englisch.txt") 
EndIf
existierende Dateien liest man besser mit ReadFile() aus und nicht mit OpenFile()
(Unterschiede zwischen beiden Methoden: siehe Hilfe-Datei).

Ausserdem sollte immer der Rückgabewert ausgewertet werden.

Code: Alles auswählen

If sprache="deutsch"
  FF = ReadFile (#PB_ANY, "deutsch.txt")
Else 
  FF = ReadFile (#PB_ANY, "englisch.txt") 
EndIf
If FF
 [...]
 CloseFile(FF)
EndIf
Grüße ... Kiffi
a²+b²=mc²
Benutzeravatar
Batze
Beiträge: 1492
Registriert: 03.06.2005 21:58
Wohnort: Berlin
Kontaktdaten:

Beitrag von Batze »

Ich find das hier schöner Kiffi.

Code: Alles auswählen

; Hier muss irgendwo der User nach seiner Sprache gefragt werden, oder man machts wie bobobo vorgeschlagen hat
Sprache.s = lcase(Sprache)
If ReadFile(0, Sprache + ".dat")
elseif readfile(0, "english.dat") = 0
end
endif
Hier sind meine Codes (aber die Seite geht gerade nicht):
http://www.basicpure.de.vu
Antworten