Курсовая работа: Облік компютерів та комплектуючих на підприємстві

N20: TMenuItem;

N21: TMenuItem;

PopupMenu1: TPopupMenu;

N22: TMenuItem;

N23: TMenuItem;

N24: TMenuItem;

N25: TMenuItem;

N26: TMenuItem;

N27: TMenuItem;

procedure Save;

procedure Load;

procedure FormCreate(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure ShowComp(DepIndex,Index,Row:Byte);

procedure ShowDepartament(Index:Byte);

procedure DelDep(Index:Byte);

function DelComp(DepIndex,Index:Byte):Boolean;

function MoveCompToDep(DepIndex,Index,NewDep:Byte):Boolean;

function MoveAllCompToDep(DepIndex,NewDep:Byte):Boolean;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure ComboBox1KeyDown(Sender: TObject; var Key: Word;

Shift: TShiftState);

procedure FormClose(Sender: TObject; var Action: TCloseAction);

procedure ComboBox1Change(Sender: TObject);

procedure Edit1Change(Sender: TObject);

procedure Button5Click(Sender: TObject);

procedure SGSelectCell(Sender: TObject; ACol, ARow: Integer;

var CanSelect: Boolean);