Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > C/C++: Общие вопросы > Куча ошибок??


Автор: en-horror 21.12.2004, 22:11
При запуске вот этого кода

Код

#include "FileCtrl.hpp"
#include
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void ListFiles(AnsiString path, TStrings* List)
{
Form1->Memo1->Lines->Add("lol");
TSearchRec sr;
if (FindFirst(path+"*.*", faAnyFile, sr) == 0)
{
do
{
if (sr.Attr  
}
}
else
{
AnsiString Ext=ExtractFileExt(sr.Name).UpperCase();
if (Ext==".CPP")
List->Add(path+sr.Name);
}
}
while (FindNext(sr) == 0);
FindClose(sr);
}
Application->ProcessMessages();
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ListFiles("c:\\",Memo1->Lines);
}
//---------------------------------------------------------------------------


Вылетает куча, ну просто такая куча, ошибок вот таких
[C++ Error] Unit1.cpp(26): E2206 Illegal character ' ' (0xa0)
[C++ Error] Unit1.cpp(27): E2206 Illegal character ' ' (0xa0)
[C++ Error] Unit1.cpp(27): E2206 Illegal character ' ' (0xa0)
....
Народ мож я что то пропустил в коде?



Автор: chaos 22.12.2004, 07:10
меня или глючит с утра или что, но что то мне кажется что у тебя куча
} лишних smile
Код

void ListFiles(AnsiString path, TStrings* List)
{
Form1->Memo1->Lines->Add("lol");
TSearchRec sr;
if (FindFirst(path+"*.*", faAnyFile, sr) == 0)
{
do
{
if (sr.Attr  
}
}
else
{
AnsiString Ext=ExtractFileExt(sr.Name).UpperCase();
if (Ext==".CPP")
List->Add(path+sr.Name);
}
}
while (FindNext(sr) == 0);
FindClose(sr);
}
Application->ProcessMessages();
}

Автор: Doc_d0s 22.12.2004, 18:32
Агы тысячу скобок, расставь из нормально! smile

Автор: sergejzr 22.12.2004, 19:23
А это что?


Код

if (sr.Attr  



Автор: en-horror 22.12.2004, 22:47
Код

void ListFiles(AnsiString path, TStrings* List)
{
Form1->Memo1->Lines->Add("lol");

TSearchRec sr;
if (FindFirst(path+"*.*", faAnyFile, sr) == 0)
{
do
{
if (sr.Attr & faDirectory)
{
if (sr.Name!=".")
if (sr.Name!="..")
{
ListFiles(path+sr.Name+"\\",List); 
}
}
else
{
AnsiString Ext=ExtractFileExt(sr.Name).UpperCase();
if (Ext==".CPP")
List->Add(path+sr.Name);
}
}
while (FindNext(sr) == 0);
FindClose(sr);
}
 
Application->ProcessMessages();

}

void __fastcall TForm1::FormCreate(TObject *Sender)
{
//ListFiles("c:\\",Memo1->Lines);

}
//---------------------------------------------------------------------------



У меня что то код плохо пропечатался, у меня со скобками все впорядке

Автор: _hunter 23.12.2004, 12:06
а теперь какие ошибки?
+ укажи где у тебя эти строки

Автор: en-horror 25.12.2004, 23:18
у меня каждая строчка с
TSearchRec sr;
и до
if (sr.Name!=".")
помечены этой ощибкой и по несколько раз.
Я воопще даже представить не могу в чем там проблема.

Автор: sergejzr 25.12.2004, 23:22
Это чего то с компилятором неладно имхо...
Попробуй, скопируй код в блокнот, а потом опять в Бильдер.

Автор: en-horror 25.12.2004, 23:53
Все полный, я даже не прпедставляю что за фигня smile

Автор: bel_nikita 25.12.2004, 23:56
Может все-таки так:
Цитата
if (sr.Name!='.')


З.Ы.: Только не бейте меня, я не знаю Borland'а smile И знать не хочу smile

Автор: Domestic Cat 26.12.2004, 08:30
А ты эти строки откуда-то из других файлов/нета скопировал? Такая ерунда случается если компилятор не ожидает файл в нужной кодировке. Тогда пробел он воспринимает как другой символ и выдает кучу ошибок. Результат не гарантирую, но попробуй удалить и перенабрать строки с ошибками.

Автор: S.A.P. 26.12.2004, 10:15
У тебя там NO-BREAK SPACE (0xA0) стоят. Скорее всего ты их не видишь, но они там есть smile .

Автор: en-horror 27.12.2004, 00:14
все, спасибо большое народ, переписал все от руки заново ,запахало.
smile

Автор: Hroft 27.12.2004, 12:35
Надо было в ворд вставить, и непечатаемые символы отобразить smile.

Автор: sergejzr 27.12.2004, 13:30
Цитата(Hroft @ 27.12.2004, 11:35)
Надо было в ворд вставить, и непечатаемые символы отобразить smile.

Или в блокнот. как я предлагал. Он тоже символы отображает smile

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)