Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Заполнение StringGrid из txt-файла 
V
    Опции темы
LEXONNN
Дата 11.4.2010, 17:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 5.4.2010

Репутация: нет
Всего: нет



Ну вот єтот код
Код

        TStringList* list1=new TStringList();
        TStringList* list2=new TStringList();
        list1->LoadFromFile(OpenDialog1->FileName);
        ExtractStrings(TSysCharSet()<<'\t'<<'\n', TSysCharSet(), list1->Text.c_str(), list2);
        int n=list2->Count/3;
        for(int i=1;i<n;i++)
            for(int j=1;j<3;j++)
                StringGrid1->Cells[j][i+1]=list2->Strings[i*3+j];
        delete list1;
        delete list2;

PM MAIL   Вверх
ИванМ
Дата 11.4.2010, 17:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1260
Регистрация: 19.6.2006
Где: СПб

Репутация: 5
Всего: 23



А ты вызвал метод OpenDialog1->Execute() перед этим?
PM MAIL   Вверх
LEXONNN
Дата 11.4.2010, 17:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 5.4.2010

Репутация: нет
Всего: нет



нет) 
но я исправил! вот мой код
Код

void __fastcall TForm1::N2Click(TObject *Sender)
{
      OpenDialog1->Execute();
        TStringList* list1=new TStringList();
        TStringList* list2=new TStringList();
        list1->LoadFromFile(OpenDialog1->FileName);
        ExtractStrings(TSysCharSet()<<'\t'<<'\n', TSysCharSet(), list1->Text.c_str(), list2);
        int n=list2->Count/7;
        for(int i=1;i<n;i++)
            for(int j=1;j<7;j++)
               StringGrid1->Cells[j][i]=list2->Strings[i*7+j];
        delete list1;
        delete list2;
}

но он почемуто выводит только одну строчку и у ячейку 1-1 не записывает первое слово из тхт файла
как мне сделать чтоб ввесь файл загружался??? 
а когда я ставлю
Код

StringGrid1->Cells[j][i]=list2->Strings[i*6+j];

то он записывает первое слово не не записывает последнее((((
PM MAIL   Вверх
ИванМ
Дата 11.4.2010, 17:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1260
Регистрация: 19.6.2006
Где: СПб

Репутация: 5
Всего: 23



Код

       TStringList* list1=new TStringList();
        TStringList* list2=new TStringList();
        list1->LoadFromFile(OpenDialog1->FileName);
        ExtractStrings(TSysCharSet()<<'\t'<<'\n', TSysCharSet(), list1->Text.c_str(), list2);
        int n=list2->Count/7;
        for(int i=0;i<n;i++)
            for(int j=0;j<7;j++)
                StringGrid1->Cells[j][i+1]=list2->Strings[i*7+j];
        delete list1;
        delete list2;

Этот вариант, если слева нет фиксированного столбца, а сверху есть. Если у тебя слева фиксированный столбец, то напиши Cells[j+1][i+1].
PM MAIL   Вверх
LEXONNN
Дата 11.4.2010, 18:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 5.4.2010

Репутация: нет
Всего: нет



спасибо Все работает)))))
PM MAIL   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




[ Время генерации скрипта: 0.0461 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.