Label101.Visible:=true;
Label102.Visible:=true;
Label103.Visible:=true;
Label138.Visible:=true;
Label139.Visible:=true;
Label140.Visible:=true;
Label156.Visible:=true;
Label157.Visible:=true;
Label158.Visible:=true;
Label171.Visible:=true;
Label172.Visible:=true;
Label173.Visible:=true;
Image33.Visible:=true;
Edit7.Visible:=true;
Edit8.Visible:=true;
Edit24.Visible:=true;
Edit34.Visible:=true;
Edit42.Visible:=true;
Edit43.Visible:=true;
Label104.Visible:=true;
Label105.Visible:=true;
Label106.Visible:=true;
Label107.Visible:=true;
Label108.Visible:=true;
Label144.Visible:=true;
Label145.Visible:=true;
Label146.Visible:=true;
Label162.Visible:=true;
Label163.Visible:=true;
Label164.Visible:=true;
Label177.Visible:=true;
Label178.Visible:=true;
Label179.Visible:=true;
Image35.Visible:=true;
Edit10.Visible:=true;
Edit11.Visible:=true;
Edit26.Visible:=true;
Edit36.Visible:=true;
Edit44.Visible:=true;
Edit45.Visible:=true;
Label114.Visible:=true;
Label115.Visible:=true;
Label116.Visible:=true;
Label117.Visible:=true;
Label118.Visible:=true;
Label147.Visible:=true;
Label148.Visible:=true;
Label149.Visible:=true;
Label165.Visible:=true;
Label166.Visible:=true;
Label167.Visible:=true;
Label180.Visible:=true;
Label181.Visible:=true;
Label182.Visible:=true;
Image36.Visible:=true;
Image39.Visible:=true;
Edit13.Visible:=true;
Edit14.Visible:=true;
Edit28.Visible:=true;
Edit38.Visible:=true;
Edit46.Visible:=true;
Edit47.Visible:=true;
Label124.Visible:=true;
Label125.Visible:=true;
Label126.Visible:=true;
Label127.Visible:=true;
Label128.Visible:=true;
Label150.Visible:=true;
Label151.Visible:=true;
Label152.Visible:=true;
Label168.Visible:=true;
Label169.Visible:=true;
Label170.Visible:=true;
Label183.Visible:=true;
Label184.Visible:=true;
Label185.Visible:=true;
Image37.Visible:=true;
Label121.Visible:=true;
Label122.Visible:=true;
Label109.Visible:=true;
Label110.Visible:=true;
Edit30.Visible:=true;
Edit31.Visible:=true;
Edit48.Visible:=true;
Label111.Visible:=true;
Label112.Visible:=true;
Label113.Visible:=true;
Label119.Visible:=true;
Label120.Visible:=true;
Label141.Visible:=true;
Label142.Visible:=true;
Label143.Visible:=true;
Label123.Visible:=true;
Label153.Visible:=true;
Label154.Visible:=true;
Label155.Visible:=true;
Label159.Visible:=true;
Label160.Visible:=true;
Edit49.Visible:=true;
Edit50.Visible:=true;
Image27.Visible:=true;
Label176.Visible:=true;
end;
end;
procedure TForm1.ComboBox2Change(Sender: TObject);
begin
If (ComboBox1.Text<>'') and (ComboBox2.Text<>'') then Button7.Enabled:=true;
end;
procedure TForm1.cheh1;
begin
Edit1.Visible:=false;
Edit2.Visible:=false;
Edit16.Visible:=false;
Edit18.Visible:=false;
Edit20.Visible:=false;
Edit21.Visible:=false;
Edit20.Visible:=false;
Label93.Visible:=false;
Label95.Visible:=false;
Label96.Visible:=false;
Label97.Visible:=false;
Label98.Visible:=false;
Label129.Visible:=false;
Label130.Visible:=false;
Label131.Visible:=false;
Label132.Visible:=false;
Label133.Visible:=false;
Label134.Visible:=false;
Label135.Visible:=false;
Label136.Visible:=false;
Label137.Visible:=false;
Image19.Visible:=false;
Edit3.Visible:=false;
Image12.Visible:=false;
Edit17.Visible:=false;
Image18.Visible:=false;
Edit19.Visible:=false;
Image11.Visible:=false;
Image29.Visible:=false;
Edit4.Visible:=false;
Edit5.Visible:=false;
Edit6.Visible:=false;
Label99.Visible:=false;
Label100.Visible:=false;
Label101.Visible:=false;
Label102.Visible:=false;
Label103.Visible:=false;
Image13.Visible:=false;
Image34.Visible:=false;
Edit7.Visible:=false;
Edit8.Visible:=false;
Edit9.Visible:=false;
Label108.Visible:=false;
Label104.Visible:=false;
Label105.Visible:=false;
Label106.Visible:=false;
Label107.Visible:=false;
Image14.Visible:=false;
Image38.Visible:=false;
Edit10.Visible:=false;
Edit11.Visible:=false;
Edit12.Visible:=false;
Label114.Visible:=false;
Label115.Visible:=false;
Label116.Visible:=false;
Label117.Visible:=false;
Label118.Visible:=false;
Image15.Visible:=false;
Image39.Visible:=false;
Edit13.Visible:=false;
Edit14.Visible:=false;
Edit15.Visible:=false;
Label124.Visible:=false;
Label125.Visible:=false;
Label126.Visible:=false;
Label127.Visible:=false;
Label128.Visible:=false;
Image16.Visible:=false;
Label138.Visible:=false;
Label139.Visible:=false;
Label140.Visible:=false;
Image20.Visible:=false;
Edit22.Visible:=false;
Edit23.Visible:=false;
Image21.Visible:=false;
Image21.Visible:=true;
Edit16.Visible:=false;
Edit17.Visible:=false;
Label138.Visible:=false;
Label139.Visible:=false;
Label140.Visible:=false;
Image21.Visible:=false;
Label144.Visible:=false;
Label145.Visible:=false;
Label146.Visible:=false;
Image22.Visible:=false;
Label104.Visible:=false;
Label105.Visible:=false;
Label106.Visible:=false;
Label107.Visible:=false;
Label108.Visible:=false;
Edit24.Visible:=false;
Edit25.Visible:=false;
Edit7.Visible:=false;
Edit8.Visible:=false;
Edit26.Visible:=false;
Edit27.Visible:=false;
Label114.Visible:=false;
Label115.Visible:=false;
Label116.Visible:=false;
Label117.Visible:=false;
Label118.Visible:=false;
Label147.Visible:=false;
Label148.Visible:=false;
Label149.Visible:=false;
Image24.Visible:=false;
Label150.Visible:=false;
Label151.Visible:=false;
Label152.Visible:=false;
Image23.Visible:=false;
Edit28.Visible:=false;
Edit29.Visible:=false;
Label138.Visible:=false;
Label139.Visible:=false;
Label140.Visible:=false;
Label156.Visible:=false;
Label157.Visible:=false;
Label158.Visible:=false;
Image26.Visible:=false;
Edit32.Visible:=false;
Edit33.Visible:=false;
Edit34.Visible:=false;
Edit35.Visible:=false;
Label162.Visible:=false;
Label163.Visible:=false;
Label164.Visible:=false;
Image30.Visible:=false;
Edit36.Visible:=false;
Edit37.Visible:=false;
Label165.Visible:=false;
Label166.Visible:=false;
Label167.Visible:=false;
Image31.Visible:=false;
Edit38.Visible:=false;
Edit39.Visible:=false;
Label168.Visible:=false;
Label169.Visible:=false;
Label170.Visible:=false;
Image32.Visible:=false;
Edit40.Visible:=false;
|
Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4 5 6 7 8 9 10 11 |
