Курсовая работа: Компонент программного комплекса для шифрования/дешифрования данных
begin
form2.visible:=true;
end;
procedure TForm1.N7Click(Sender: TObject);
begin
form3.visible:=true;
end;
procedure TForm1.N8Click(Sender: TObject);
begin
form4.visible:=true;
end;
procedure TForm1.RadioButton1Click(Sender: TObject);
begin
Button1.visible:=true;
Button2.visible:=true;
Button3.visible:=false;
Button4.visible:=false;
Button5.visible:=false;
Button6.visible:=false;
edit1.visible:=true;
end;
procedure TForm1.RadioButton2Click(Sender: TObject);
begin
Button1.visible:=false;
Button2.visible:=false;
Button3.visible:=true;
Button4.visible:=true;
Button5.visible:=false;
Button6.visible:=false;