VPF::Новые окна - Форум программистов

Uch3nik

Дата 14.1.2007, 14:50 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 73
Регистрация: 30.11.2006
Где: Москва

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

Есть приложение, в котором при нажатии на кнопку образуется неограниченное число окон(форм). Подскажите плз, как это сделать на практике!

stmamont

Дата 14.1.2007, 15:34 (ссылка)

(нет голосов)

Загрузка ...

Опытный

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

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

Код


#include "Form1.h"

...
for(int i = 0 ; i < 100 ; ++ i)
{
TForm1 *newForm = new TForm1(Application);
newForm->Show();
}

Это сообщение отредактировал(а) stmamont - 14.1.2007, 15:38

--------------------

RatHat

Дата 14.1.2007, 15:39 (ссылка)

(нет голосов)

Загрузка ...

Вождь индейцев

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

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

мда, уже успели раньше меня)

Это сообщение отредактировал(а) RatHat - 14.1.2007, 15:41

--------------------

Ma a kis' hi ve'ist i wan'i na e'ho ho wan'i

Uch3nik

Дата 14.1.2007, 19:01 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 73
Регистрация: 30.11.2006
Где: Москва

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

Большое спасибо! а то сам бы недопёр! smile

Uch3nik

Дата 15.1.2007, 00:03 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 73
Регистрация: 30.11.2006
Где: Москва

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

Нужно написать прогу, которая сохраняет настройки в ini файле. Прога создаёт "info.ini" соответственно в каталоге программы, но файл =NULL!!! Помогите пожалуйста, что исправить, чтоб прога писАла в файл smile

!!! Может путь создания файла виноват!?

Код


void __fastcall TForm1::FormCreate(TObject *Sender)
{
      sFile ="Info.ini";
      FILE *F;
      if(FileExists("Info.ini"))
      {
        Ini = new TIniFile(sFile);
        Font->Name = Ini->ReadString("Параметры","Шрифт","Ms Sans Serif");
      }
     else if(!FileExists(sFile))
     {
       if((F = fopen(sFile.c_str(), "w+"))== NULL)
       {
         ShowMessage("Не могу открыть");
         return;
       }
       fclose(F);
     }
     Ini = new TIniFile(sFile);
     Ini->WriteString("Files","main",ParamStr(0));
     Ini->WriteString("Параметры","Шрифт",Font->Name);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BUnInstClick(TObject *Sender)
{
      FILE *F;
      if(FileExists(sFile))
      DeleteFile(sFile);  
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BFontClick(TObject *Sender)
{
       FontDialog1->Font->Assign(Font);
       if(FontDialog1->Execute())
       {
         Font->Assign(FontDialog1->Font);
         if((Ini == NULL) && Ini->ValueExists("Параметры","Шрифт"));
         Ini->WriteString("Параметры","Шрифт",Font->Name);
       }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormHide(TObject *Sender)
{
         FILE *F;

         if(Ini == NULL) return;
     else if(!FileExists(sFile))
     {
       if((F = fopen(sFile.c_str(), "w+"))== NULL)
       {
         ShowMessage("Не могу открыть");
         return;
       }
       fclose(F);
     }
     Ini = new TIniFile(sFile);
     Ini->WriteString("Files","main",ParamStr(0));
     Ini->WriteString("Параметры","Шрифт",Font->Name);
Ini->UpdateFile();
         delete Ini;
}

stmamont

Дата 15.1.2007, 01:16 (ссылка)

(нет голосов)

Загрузка ...

Опытный

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

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

попробуй

Код


sFile ="./Info.ini"; // файл лежит в текущей папке, иначе файл ищется у меня в c:/WINDOWS/

а вообще для другово вопроса надо создавать новую тему!!!!!

Это сообщение отредактировал(а) stmamont - 15.1.2007, 01:16

--------------------

Uch3nik

Дата 15.1.2007, 02:29 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 73
Регистрация: 30.11.2006
Где: Москва

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

Точно! Спасибо! smile

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