67 lines
2.5 KiB
Plaintext
67 lines
2.5 KiB
Plaintext
//---------------------------------------------------------------------------
|
|
|
|
#ifndef Unit1H
|
|
#define Unit1H
|
|
//---------------------------------------------------------------------------
|
|
#include <Classes.hpp>
|
|
#include <Controls.hpp>
|
|
#include <StdCtrls.hpp>
|
|
#include <Forms.hpp>
|
|
#include <Menus.hpp>
|
|
#include <Dialogs.hpp>
|
|
//---------------------------------------------------------------------------
|
|
class TForm1 : public TForm
|
|
{
|
|
__published: // IDE-managed Components
|
|
TMainMenu *MainMenu1;
|
|
TMenuItem *Plik1;
|
|
TMenuItem *Nowy1;
|
|
TMenuItem *Otwrz1;
|
|
TMenuItem *Otwrz2;
|
|
TMenuItem *Zapisz1;
|
|
TMenuItem *Zapiszjako1;
|
|
TMenuItem *N1;
|
|
TMenuItem *Zakocz1;
|
|
TMenuItem *Edycja1;
|
|
TMenuItem *Wytnijcrtx1;
|
|
TMenuItem *Kopiiuj1;
|
|
TMenuItem *WklejCtrlV1;
|
|
TMenuItem *Format1;
|
|
TMenuItem *Zawijaniewierszy1;
|
|
TMenuItem *Ccionka1;
|
|
TMenuItem *Pomoc1;
|
|
TMenuItem *Informacje1;
|
|
TMenuItem *Oprogramie1;
|
|
TMenuItem *Kalkulator1;
|
|
TMemo *tresc;
|
|
TMenuItem *Zegar1;
|
|
TOpenDialog *OpenDialog1;
|
|
TSaveDialog *SaveDialog1;
|
|
TFontDialog *FontDialog1;
|
|
TMenuItem *WujekGoogle1;
|
|
void __fastcall Otwrz2Click(TObject *Sender);
|
|
void __fastcall Zapisz1Click(TObject *Sender);
|
|
void __fastcall Zapiszjako1Click(TObject *Sender);
|
|
void __fastcall Nowy1Click(TObject *Sender);
|
|
void __fastcall trescKeyDown(TObject *Sender, WORD &Key,
|
|
TShiftState Shift);
|
|
void __fastcall Zakocz1Click(TObject *Sender);
|
|
void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
|
|
void __fastcall Wytnijcrtx1Click(TObject *Sender);
|
|
void __fastcall Kopiiuj1Click(TObject *Sender);
|
|
void __fastcall WklejCtrlV1Click(TObject *Sender);
|
|
void __fastcall Zawijaniewierszy1Click(TObject *Sender);
|
|
void __fastcall Ccionka1Click(TObject *Sender);
|
|
void __fastcall Oprogramie1Click(TObject *Sender);
|
|
void __fastcall WujekGoogle1Click(TObject *Sender);
|
|
void __fastcall Kalkulator1Click(TObject *Sender);
|
|
private: // User declarations
|
|
public: // User declarations
|
|
|
|
__fastcall TForm1(TComponent* Owner);
|
|
};
|
|
//---------------------------------------------------------------------------
|
|
extern PACKAGE TForm1 *Form1;
|
|
//---------------------------------------------------------------------------
|
|
#endif
|