Форум С++

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

Автор: fs444   (18.08.2009 в 11:27)
Пишу

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 static int i = 0;
 char prev[24], next[24], count[][8] =
  {
   "Девять\0""Восемь\0""Семь\0""Шесть\0""Пять\0""Четверо\0""Трое\0""Двое\0""Один из\0""Нет"
  };
 if (i == 9) return;
 strcpy(prev, count[i++]); strcat(prev, " негритят");
 ListBox1->Items->Append(prev);
 strcpy(next, count[i]); strcat(next, " негритят");
 Edit1->Text = next;
}
//---------------------------------------------------------------------------

А открывается

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
                 Application->Initialize();
                 Application->CreateForm(__classid(TForm1), &Form1);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        catch (...)
        {
                 try
                 {
                         throw Exception("");
                 }
                 catch (Exception &exception)
                 {
                         Application->ShowException(&exception);
                 }
        }
        return 0;
}
//---------------------------------------------------------------------------

Открываю через File > Open project файл с расширением bpr.
Окно программы состоит из списка ListBox, кнопки Button и текстового поля Edit.


Ваше имя:

Пароль:

Цитировать

Используйте тэги для выделения текста:
Код: [code][/code]
Жирный: [b][/b]
Наклонный: [i][/i]
URL: [url][/url]

Сообщение:

Прикрепить: