Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
2
Добавлен:
30.05.2020
Размер:
901 б
Скачать
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Edit1KeyPress(TObject *Sender, char &Key)
{
  if(((Key>='0')&&(Key<='9'))||(Key==VK_BACK))
    return;
  Key=0;
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button2Click(TObject *Sender)
{
/**/        
}
//---------------------------------------------------------------------------

Соседние файлы в папке Matrix
  • #
    30.05.20201.73 Кб2MatrixUnit.h
  • #
    30.05.2020110.89 Кб2MatrixUnit.obj
  • #
    30.05.20203.01 Кб2MatrixUnit.~cpp
  • #
    30.05.20203.58 Кб2MatrixUnit.~dfm
  • #
    30.05.20201.66 Кб2MatrixUnit.~h
  • #
    30.05.2020901 б2Unit2.cpp
  • #
    30.05.202051 б2Unit2.ddp
  • #
    30.05.2020951 б2Unit2.dfm
  • #
    30.05.2020948 б2Unit2.h
  • #
    30.05.202037.51 Кб2Unit2.obj
  • #
    30.05.2020901 б2Unit2.~cpp