Wątek(z FileExists) + OpenDialog = błąd

[GoldWolf]

Witam, mam taki błąd, iż jak użyję OpenD to sypnie mi się FileExists. Jak nacisnę B2:

Kod: Zaznacz cały

void __fastcall TForm5::Button2Click(TObject *Sender)
{
straznik = 0;
OpenDialog1->InitialDir = "c:\\"; //katalog początkowy
if(OpenDialog1->Execute()){
   if(!OpenDialog1->FileName.IsEmpty()){ //zabezpieczenie przed pustą nazwą
      nazwa_pliku = OpenDialog1->FileName.c_str();//
/*      if (nazwa_pliku.find(".txt") != std::string::npos)
         straznik = 1;*/
   }
}
}

Domyśliłem się, iż chodzi o to, że gdy wskaże plik a.txt, to potem ja chce użyć w wątku FileExists("b.txt") - to on sprawdzi ten warunek dla a.txt. Jak to wyczyścić?

PS chyba ze zmęczenia napisałem brednie, dokładniej sformułowane pytanie.

[banita]

nie rozumiem o co tobie chodzili ale podany fragment kodu jest conajmniej lekko niepoprawny.
gdy piszesz:

Kod: Zaznacz cały

if(OpenDialog1->Execute())
{
// ten kod wykona sie tylko gdy wybrano jaki plik. pusta nazwa nie jest tu mozliwa.
}

dalej:

Kod: Zaznacz cały

nazwa_pliku = OpenDialog1->FileName.c_str();
if (nazwa_pliku.find(".txt") != std::string::npos)
straznik = 1;

wystarczy:

Kod: Zaznacz cały

if(ExtractFileExt(OpenDialog1->FileName).AnsiCompareIC("txt") == 0)

[Cyfrowy Baron]

JA też nie do końca to rozumiem.

Kod: Zaznacz cały

nazwa_pliku = OpenDialog1->FileName.c_str();

jakim typem jest zmienna nazwa_pliku, gdyż przypisując jej wartość dokonujesz konwersji na typ char, jeżeli więc nazwa_pliku jest typu char to oczywiście nie można jej tak po prostu przypisać wartości typu AnsiString, trzeba by tutaj posłużyć się np. funkcją sprintf. Jeżeli nazwa_pliku jest typu AnsiString, no to dlaczego przypisując zmiennej typu AnsiString wartość będącą również typem AnsiString (OpenDialog1->FileName <- typ AnsiString), dokonujesz konwersji na typ char?!

[polymorphism]

jakim typem jest zmienna nazwa_pliku [...]

Przecież po warunku if'a widać, że chodzi o std::string'a. Stąd użycie c_str, wszak string nie ma przeładowanego operatora = dla AnsiString'a (w każdym razie nic mi o tym nie wiadomo).

[Cyfrowy Baron]

Tylko jaki sens jest tutaj używać zmiennej typu std::string, pomijając już fakt, że banita podał rozwiązanie, można by się posłużyć typem AnsiString i zamiast:

Kod: Zaznacz cały

if (nazwa_pliku.find(".txt") != std::string::npos)
         straznik = 1;*/


można zrobić tak:

Kod: Zaznacz cały

  if(nazwa_pliku.LastDelimiter(".txt") <= 0)
     straznik = 1;

[polymorphism]

Tylko jaki sens jest tutaj używać zmiennej typu std::string

Nie wiem, nie mój kod, nie do mnie to pytanie.

[GoldWolf]

Nie o to chodzi o czym mówicie. Button2 działa poprawnie tak jak chcę, może jest to trochę łopatologicznie wykonane, ale działa tak jak chcę.

Chodzi mi o to, iż jeśli w programie użyję tego klawisza wskażę plik o nazwie a.txt to gdy potem chce

Kod: Zaznacz cały

int __fastcall Watek1(Pointer Parameter){
using std::string;
using std::ifstream;

if (FileExists("b.txt")) {
   plik.open("b.txt");
   if (plik.is_open()) {
      getline(plik, klu);
   }else{
      Form5->Label1->Caption = "Błąd odczytu!";
      ExitThread(GetExitCodeThread(Watek1, NULL)); // usunięcie wątku z pamięci,
   }
   plik.close();

ExitThread(GetExitCodeThread(Watek1, NULL)); // usunięcie wątku z pamięci,
            //od tego momentu wątku nie można już wstrzymać.
return 0;
}

To on nie sprawdzi mi FileExists od b.txt, tylko pamięta to a.txt czyli tak jakby sprawdza FileExists("a.txt"). Jak napisałem domyśliłem się, iż chodzi o to iż używam wcześniej OpenDialog i wskazuje plik a.txt, tylko dlaczego przy użyciu FileExists on nie szuka dla b.txt jak mam w kodzie tylko szuka dla a.txt. A co za tym idzie, mój if(dla wątku) się nie wykona. Gdy po uruchomieniu aplikacji użyję tylko wątku to działa poprawnie, ale jak użyję butona2 a potem wątku nie działa(Form5->Label1->Caption = "Błąd odczytu!";).

PS przepraszam za pierwszego posta chyba wyciąłem za dużo podczas edycji i pytanie było bez sensu.

[GoldWolf]

Tylko jaki sens jest tutaj używać zmiennej typu std::string, pomijając już fakt, że banita podał rozwiązanie, można by się posłużyć typem AnsiString i zamiast:

Kod: Zaznacz cały

if (nazwa_pliku.find(".txt") != std::string::npos)
         straznik = 1;*/


Robi dokładnie to co chce sprawdza czy został wybrany plik z rozszerzeniem .txt(tylko txt mnie interesuje), nie znałem innych rozwiązań. Trochę ostatnio pracowałem ze stringiem więc wydało mi się to naturalne.

można zrobić tak:

Kod: Zaznacz cały

  if(nazwa_pliku.LastDelimiter(".txt") <= 0)
     straznik = 1;

Postaram się zapamiętać, w książce nie było takiej metody.

[GoldWolf]

nie rozumiem o co tobie chodzili ale podany fragment kodu jest conajmniej lekko niepoprawny.
gdy piszesz:

Kod: Zaznacz cały

if(OpenDialog1->Execute())
{
// ten kod wykona sie tylko gdy wybrano jaki plik. pusta nazwa nie jest tu mozliwa.
}

dalej:

Kod: Zaznacz cały

nazwa_pliku = OpenDialog1->FileName.c_str();
if (nazwa_pliku.find(".txt") != std::string::npos)
straznik = 1;

wystarczy:

Kod: Zaznacz cały

if(ExtractFileExt(OpenDialog1->FileName).AnsiCompareIC("txt") == 0)

Rozwiązanie zaczerpnięte z doctora.

[Witold]

można zrobić tak:

Kod: Zaznacz cały

  if(nazwa_pliku.LastDelimiter(".txt") <= 0)
     straznik = 1;

Postaram się zapamiętać, w książce nie było takiej metody.

Lepiej nie, to nie zadziała poprawnie. LastDelimiter szuka znaku, nie ciągu znaków.
Konstrukcja ExitThread(GetExitCodeThread(Watek1, NULL)); jest też błędna. Zły argument dla GetExitCodeThread. Argumentem dla ExitThread może być GetExitCodeThread ?

[GoldWolf]

można zrobić tak:

Kod: Zaznacz cały

  if(nazwa_pliku.LastDelimiter(".txt") <= 0)
     straznik = 1;

Postaram się zapamiętać, w książce nie było takiej metody.

Lepiej nie, to nie zadziała poprawnie. LastDelimiter szuka znaku, nie ciągu znaków.
Konstrukcja ExitThread(GetExitCodeThread(Watek1, NULL)); jest też błędna. Zły argument dla GetExitCodeThread. Argumentem dla ExitThread może być GetExitCodeThread ?

Dzięki za info jednak nie rozwiązuje to mojego problemu. Ponieważ i wątek i to co jest w guziku nr 2 działa poprawnie ale osobno. Po prostu nie współpracują jak wydawać się powinni.

PS wg artykułu, mam dobre wyjście z wątki.

[Cyfrowy Baron]

Lepiej nie, to nie zadziała poprawnie. LastDelimiter szuka znaku, nie ciągu znaków.

To prawda, pomyliłem funkcje, powinno być:

Kod: Zaznacz cały

  if(nazwa_pliku.AnsiPos(".txt") <= 0)
     straznik = 1;

[Witold]

jednak nie rozwiązuje to mojego problemu. Ponieważ i wątek i to co jest w guziku nr 2 działa poprawnie ale osobno. Po prostu nie współpracują jak wydawać się powinni.

Metoda TForm5::Button2Click(TObject *Sender) i funkcja int __fastcall Watek1(Pointer Parameter) mają u Ciebie tą samą treść jak te wklejone na forum ?
Form5->Label1->Caption = "Błąd odczytu!" pojawia się przy niepowodzeniu if (plik.is_open()) a nie przy if (FileExists("b.txt")) . Testowałeś flagi strumienia?

PS wg artykułu, mam dobre wyjście z wątki.

Tam jest błąd. Mogłeś sobie posprawdzać/zrozumieć co wklejasz do kodu, ale po co ?

[polymorphism]

Ponieważ i wątek i to co jest w guziku nr 2 działa poprawnie ale osobno.

Hmm, czyli chodzi ci o to, żeby plik, który wybierzesz w Button2Click był otwarty w wątku, tak?

PS wg artykułu, mam dobre wyjście z wątki.

Nie masz. Po pierwsze, użycie GetExitCodeThread jest zupełnie bez sensu. Sprawdzałeś w ogóle co to za funkcja? Podejrzewam, że nie. Tą funkcję wywołujesz wtedy, gdy chcesz pobrać exit code'a wątku. Jeśli tak, to wywołanie tej funkcji ma sens wtedy, gdy wątek zostanie zakończony, czyli nie wywołujesz jej wewnątrz wątka, od którego chcesz pobrać wartość zwrotną - to chyba logiczne Po drugie, w C++ użycie ExitThread do wychodzenia z wątków nie jest zbyt bezpieczne (nie będę wnikał dlaczego). Po trzecie, w VCL-u masz klasę TThread, użyj jej zamiast funkcji CreateThread/BeginThread. Po czwarte, nie możesz obwoływać się do obiektów VCL wewnątrz wątków bez synchonizacji (vide TThread::Synchronize). Po szóste, nawet po wywołaniu ExitThread, uchwyt zwrócony przez funkcję tworzącą wątek trzeba zwolnić (w "poradzie" nic na ten temat nie ma).

[Cyfrowy Baron]

Porada z której korzystasz jest tak stara, że aż dziw bierze iż ktoś jeszcze z tego korzysta.

Lepiej skorzystać z klasy TThread, o czym było już gdzieś na tym forum, niżej masz prosty przykład użycia tej klasy:

plik nagłówkowy:

Kod: Zaznacz cały

public:      // User declarations
    __fastcall TForm1(TComponent* Owner);
      int p;

plik źródłowy:

Kod: Zaznacz cały

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

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
class myThread : public TThread
{
    TForm1 *tForm;

protected:
    void __fastcall get_p(void);
    void __fastcall Execute(void);

public:

   // __fastcall myThread(TForm1 *Form);
   myThread(TForm1 *_form):TThread(true), tForm(_form){}
};
/*__fastcall myThread::myThread(TForm1 *Form)
  : TThread(Form)
{
tForm = Form;
}  */
//---
void _fastcall myThread::get_p(void)
{
  int czas = tForm->p + tForm->Edit1->Text.ToIntDef(-1);
  tForm->Edit2->Text = czas;
}
void __fastcall myThread::Execute(void)
{
while(1)
{
  Synchronize(get_p);
}
}

myThread* thread;

__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
p = 100;
thread = new myThread(Form1);

}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
thread->Suspend();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
thread->Resume();
}
//---------------------------------------------------------------------------