True oder False aus Textdatei verwenden.

lasserda · Hält's aus hier Beiträge: 12 XP Prof Delphi 5 Enterprise

Hallo!

Ich habe in einer Textdatei boolsche Werte gespeichert und möchte diese nun in meinem Programm direkt einsetzen.

In etwa so:

markieren

Delphi-Quelltext

1:
2:

ListBoxEinstellungen.Items.LoadFromFile('options.dat');
CheckBox1.Checked:=ListBoxEinstellungen.Items[4]; // Zeile 4 entspricht TRUE

Gelöst habe ich es momentan so, aber das ist nich sonderlich elegant

markieren

Delphi-Quelltext

1:
2:
3:
4:

if ListBoxEinstellungen.Items[13] = 'True' then
begin
  Halle1CheckBox.Checked:=True;
end;

Gibt es irgendwie einen Befehl im Stil von StrToBoolean oder was ähnliches?

Vielen Dank schonmal für eure Hilfe.

Moderiert von Christian S.: Topic aus VCL (Visual Component Library) verschoben am So 13.05.2007 um 18:29

_________________
...

Dunkel · Beiträge: 682 Mac OS X Snow Leopard Xcode 3.1

Hallo!

lasserda hat folgendes geschrieben:

Gibt es irgendwie einen Befehl im Stil von StrToBoolean oder was ähnliches?

Fast, versuch es mal mit StrToBool.

_________________
Ich streite einsam mich mit dieser Oberflächenwelt
Gutes sei ein löblich Brot von dem ich zehre - bis zum Tod [Das Ich - Im Ich]

lasserda · Hält's aus hier Beiträge: 12 XP Prof Delphi 5 Enterprise

Wenn ich diesen Code verwende:

markieren

Delphi-Quelltext

1:	Halle1CheckBox.Checked:=StrToBool(ListBoxEinstellungen.Items[35]);

Kommt folgende Fehlermeldung:

[Fehler] Unit_Einstellungen.pas(305): Undefinierter Bezeichner: 'StrToBool'

In meiner Delphi Hilfe finde ich auch nichts zu SrToBool.

Verwende Delphi 5 Enterprise, vielleicht da nicht mit bei?

_________________
...

Coder · Beiträge: 1383 Erhaltene Danke: 1 WinXP D2005 PE

Ist eigentlich in der Unit SysUtils.
Musst mal gucken ob du die hast.

MfG

lasserda · Hält's aus hier Beiträge: 12 XP Prof Delphi 5 Enterprise

Es wird aber nicht in der SysUtils angezeigt... Eingebunen habe ich sie:

markieren

Delphi-Quelltext

1:
2:
3:
4:

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ComCtrls, StdCtrls, Spin, shlObj, ActiveX, Buttons, ExtCtrls, ColorGrd,
  Menus, Haupt_unit;

_________________
...

JayEff · Beiträge: 2971 Windows Vista Ultimate D7 Enterprise

Programmier sie dir doch selbst:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

function StrToBool(s: String): Boolean;
begin
   if s='true' then
      Result := true;
   else
      Result := false;
end;

Kannst sie ja deinen Maßstäben anpassen.
Störende Zeichen entfernen, wie z.B. #13#10 oder sowas.

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.

jakobwenzel · Verfasst: So 13.05.07 13:53

Da würd ich aber um des s ein AnsiLowerCase machen, damit das auch mit True oder tRuE geht.

_________________
I thought what I'd do was, I'd pretend I was one of those deaf-mutes.

fuba · Beiträge: 125 Win7 D7 Ent.

@ lasserda
warum verwendest du nicht nen "ini" file?

lasserda · Hält's aus hier Beiträge: 12 XP Prof Delphi 5 Enterprise

Weil ich mich damit noch nicht weiter beschäftigt habe. Werde das aber umgehend nachholen

Vielen Dank für eure Hilfe.

_________________
...

Chatfix · Verfasst: So 13.05.07 21:21

Hier erfährst du mehr zu INIs: www.kuknet.de/tutorial1.pdf

In INI-Dateien wird aber auch nicht "true" und "false als string gespeichert, sondern "1" und "0".

_________________
Gehirn: ein Organ, mit dem wir denken, daß wir denken. - Ambrose Bierce

Drahcir · Verfasst: Mo 21.05.07 13:14

Ich würde auch Boolean-Werte als 1 und 0 abspeichern. Damit spart man 3 bzw. 4 Bytes (!) sowie Probleme wie 'true' oder 'TRUE'. Ganz Sparsame können außerdem 8 Boolean-Werte auf 1 Byte quetschen.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme