Реферат Мережа комп'ютерних магазинів "21 століття"

fy">// label39.Visible: = false;

// label40.Visible: = false;

//. Visible: = false;

// label42.Visible: = false;

// label43.Visible: = false;. Visible: = false;

// label45.Visible: = false;

// label46.Visible: = false;

// label47.Visible: = false;

// label48.Visible: = false;

// label49.Visible: = false;

//. Visible: = false;

// label40.Visible: = false;

// label41.Visible: = false;

// label42.Visible: = false;

// label43.Visible: = false;. Visible: = false;

// label45.Visible: = false;

// label46.Visible: = false;

// label47.Visible: = false;

// label48.Visible: = false;

// label49.Visible: = false;

end

else showmessage ('У вас немає прав для зміни даних в БД');

end; TForm1.Button64Click (Sender: TObject); parolbegin

// label5.Visible: = true;

// edit1.Visible: = true;. Visible: = true; 3.Visible: = true;

end

else showmessage ('У вас немає прав для зміни даних в БД');

end; TForm1.Button65Click (Sender: TObject); parolbegin.Visible: = true;. Visible: = true;

// label5.Visible: = true;

// label6.Visible: = true;

// label7.Visible: = true;

// label8.Visible: = true;

// label18.Visible: = true;

// edit1.Visible: = true;

// edit2.Visible: = true;

// edit3.Visible: = true;

// edit4.Visible: = true;

// edit11.Visible: = true;

// button20.Visible: = true;

// button62.Visible: = true;

end

else showmessage ('У вас немає прав для зміни даних в БД');

end; TForm1.Button60Click (Sender: false;. Visible: = false;. Visible: = false;. Visible: = false;. Visible: = false;; TForm1.Button66Click (Sender: TObject);

// val (edit18.Text, x, z1);

// if (z1 = 0)

// and (edit18.Text <>'')

// then begin

Назад | сторінка 35 з 40 | Наступна сторінка