Author:
Evaluation:
Published: 22.01.2010.
Language: Latvian
Level: College/University
Literature: n/a
References: Not used
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 1.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 2.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 3.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 4.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 5.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 6.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 7.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 8.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 9.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 10.
  • Samples 'Praktiskais darbs. Datorgrafikas un attēlu apstrādes pamati. Kalkulators', 11.
Extract

unit Kalkulators;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TKalk = class(TForm)
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Button5: TButton;
Button6: TButton;
Button7: TButton;
Button8: TButton;
Button9: TButton;
Button10: TButton;
Edit1: TEdit;
Dal: TButton;
Minus: TButton;
Plus: TButton;
Reiz: TButton;
Ir: TButton;
Clear: TButton;
koma: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
procedure Button5Click(Sender: TObject);…

Author's comment
Atlants