mfg

Du must mit der AnsiString-Methode Pos das Trennzeichen in der Zeile suchen und mit der AnsiString-Methode SubString den Text bis zum Trennzeichen kopieren und in die ListBox einfügen.

bis bald
akari

String i;
TStringList *test = new TStringList();
test->LoadFromFile("test.txt");
i = (test->Strings[0]);
delete test;
AnsiString alles, teil;
alles = i;
teil = alles.SubString(alles.LastDelimiter(","),alles.Length());
ListBox1->Items->LoadFromFile(teil);

aber wenn ich das ganze dann starte sagt er, er kann die datei ", blablablabla" nicht öffnen und diese datei enspricht halt dem letzen teil des inhalts der test.txt

Du hast den zewiten Parameter von SubString falsch verstanden. Er gibt nicht an bis zu welchem Zeichen gelesen werden soll sondern wieviel Zeichen gelesen werden sollen

String alles;
TStringList *test = new TStringList();
test->LoadFromFile("test.txt");
alles = test->Strings[0];
delete test;
AnsiString teil;
int pos = alles.LastDelimiter(",");
teil = alles.SubString(pos,alles.Length() -pos);
ShowMessage(teil);

bis bald
akari

mfg
Hideki

Hab nur nicht an das Trennzeichen gedacht. Aber das hier geht Problemlos, fehlt nur noch die Fehlerbehandlung wenn kein Trennzeichen gefunden wurde.

AnsiString Lang = "Name1,Name2";
int Pos = Lang.LastDelimiter(",");
ShowMessage("Pos : " + IntToStr(Pos));
AnsiString Kurz = Lang.SubString(Pos +1, Lang.Length() - pos);
ShowMessage("Kurz : " + Kurz);

Das kannst du nun als Zerlegung einer Zeile umbauen.

Ansonsten wirst du keine weitere sinnvolle Hilfe bekommen können solange du nicht einen relevanten Auszug aus der besagten Datei hier mal postest und dazu noch eventueller Fehlermeldungen bzw. fehlerhafte Ausgaben.
"klappt irgendwie nicht" ist nicht aussagekräftig und wir sind keine Hellseher.

/Edit : Korrigiert

bis bald
akari

akari schrieb:

AnsiString Lang = "Name1,Name2";
int Pos = Lang.LastDelimiter(",");
ShowMessage("Pos : " + IntToStr(Pos));
AnsiString Kurz = Lang.SubString(Pos +1, Lang.Length() - pos);
ShowMessage(Kurz : " + Kurz);

Da fehlt ein Anführungszeichen
(Zeile 5)

mfg
Jakel

Hi
und gibt es dann noch die Möglichkeit den veränderten String in der ListBox wieder auszugeben?

Ja, so:

ListBox1->Items->Strings[0] = veraenderterstring;

(veraenderterstring muss dein geänderter String sein)

mfg
Jakel

mfg
Hideki

mfg
Jakel

String name;
name = (Edit1->Text);
String adresse;
adresse = (Edit2->Text);
String fertig;
fertig =(name + ", " + adresse);

if (Edit1->Text != "")
{
TStringList *list2 = new TStringList();
    list2->Insert(1,fertig);
    //list2->Add(fertig);
    list2->SaveToFile(ExtractFilePath(ParamStr(0))+ "realmlist.txt");
    delete list2;
Form2->Close();
}
else
Form2->Close();

mfg
Hideki

Das sähe dann ungefähr so aus:

String name;
name = (Edit1->Text);
String adresse;
adresse = (Edit2->Text);
String fertig;
fertig =(name + ", " + adresse);

if (Edit1->Text != "")
{
TStringList *list2 = new TStringList();
    String pfad = (ExtractFilePath(ParamStr(0));
    list2->LoadFromFile(pfad + "realmlist.txt");
    list2->Add(fertig);
    list2->SaveToFile(pfad+ "realmlist.txt");
    delete list2;
Form2->Close();
}
else
Form2->Close();

Habs noch nicht getestet, sollte aber funktionieren.

mfg
Jakel

mfg
Hideki

mfg
Jakel

mfg
Hideki

//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <OleCtrls.hpp>
#include "SHDocVw_OCX.h"

//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// Von der IDE verwaltete Komponenten
   TListBox *ListBox1;
   TCppWebBrowser *browser;
   void __fastcall FormCreate(TObject *Sender);
   void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
   void __fastcall ListBox1Click(TObject *Sender);
private:	// Anwender-Deklarationen
public:		// Anwender-Deklarationen
   __fastcall TForm1(TComponent* Owner);
   TStringList *li;
   void __fastcall Lade_Liste(AnsiString Filename);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

Unit1.cpp

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "SHDocVw_OCX"
#pragma link "SHDocVw_OCX"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
   : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
   li = new TStringList();
   Lade_Liste("liste.txt");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Lade_Liste(AnsiString Filename)
{
   li->LoadFromFile(Filename);
   ListBox1->Clear();
   AnsiString lang;
   for(int i=0;i<li->Count;i++)
   {
      lang=li->Strings[i];
      ListBox1->Items->Add(lang.SubString(1,lang.Pos(",")-1));  
   }
}
void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool &CanClose)
{
   delete li;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ListBox1Click(TObject *Sender)
{
   AnsiString lang=li->Strings[ListBox1->ItemIndex];
   const short pos=lang.Pos(",");
   browser->Navigate(WideString(lang.SubString(pos+1,lang.Length()-pos)));
}

Nochmal Danke alle

mfg
Hideki

Hideki schrieb:

aber ma ne andere Frage, wars bei euch auch so das ihr anfangs nicht genau wusstet wie ihr mit was beginnen sollt

Deshalb wird ja auch Anfängern empfohlen erstmal ein Tutorial zu den C++ Grundlagen zu machen. Und erstmal mit der Konsole anzufangen bevor man sich in die GUI stürzt.

bis bald
akari

mfg
Jakel

mfg
Hideki

Wenn ich es über ListBox->Items->Delete mache will der nen Integer

Das ist auch vollkommen korrekt. Du solltest intern auch immer nur mit Indexen arbeiten, das beseitigt das Problem der Behandlung von Textdupletten.

und selbst dann weis ich nicht wie ich es in der Textdatei entfernen kann

Du must nach jedem Löschen oder Einfügen natürlich die Textdatei aus den Daten in der ListBox bzw. Speicher neu erstellen.

bis bald
akari

int i=ListBox1->ItemIndex;
ListBox1->Items->Delete(i);
   AnsiString lang=li->Strings[ListBox1->ItemIndex];
   TStringList *kla = new TStringList();
   for(int a=0;a<ListBox1->Items->Count;a++)
    {
     kla->Add(lang);
    }
    kla->SaveToFile("kla.txt");
    delete kla;

mfg
Hideki

mal ins blaue vermutet:

int i=ListBox1->ItemIndex; 
ListBox1->Items->Delete(i); 
AnsiString lang=li->Strings[ListBox1->ItemIndex]; // siehe unten!

ListBox1->ItemIndex ist -1 weil du vorher das Item mit dem Index gelöscht hast und es somit nicht mehr selektiert ist. Wenn du aber vorher schon den Index im Zwischenspeicher (i) hast, verwende doch einfach das

Und ist es wirklich richtig das nach dem Speichern immer ein und derselbe Wert in der Textdatei (kla.txt) steht?

eingelesene Textdatei:
wert_1
wert_2 // den löschen
wert_3

Ausgabe in kla.txt:
wert_2
wert_2
wert_2

mfg, Micha

Wenn du aber vorher schon den Index im Zwischenspeicher (i) hast, verwende doch einfach das

versteh ich nicht ganz, hab das jetzt so gemacht

int i=ListBox1->ItemIndex;
ListBox1->Items->Delete(i);
   AnsiString lang=li->Strings[ListBox1->ItemIndex];
   TStringList *kla = new TStringList();
   for(int i=0;i<ListBox1->Items->Count;i++)
    {
     kla->Add(lang);
    }
    kla->SaveToFile("kla.txt");
    delete kla;

aber er bringt immer noch den gleichen Fehler

RandomAccess85 schrieb:

Und ist es wirklich richtig das nach dem Speichern immer ein und derselbe Wert in der Textdatei (kla.txt) steht?

eingelesene Textdatei:
wert_1
wert_2 // den löschen
wert_3

Ausgabe in kla.txt:
wert_2
wert_2
wert_2

eigentlich nicht :D, ich glaub da hab ich bisschen falsch gemacht, das soll eigentlich so aussehen:
eingelesene Textdatei:
wert_1
wert_2 // den löschen
wert_3

Ausgabe in kla.txt:
wert_1
wert_3

mfg
Hideki

mfg
Hideki