easylinux/SignauxComplexes
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

V10.0

Browse Source
This commit is contained in:
f1iwq2
2025-03-01 13:42:15 +01:00
parent 3d109c0b3c
commit 662da541c0
21 changed files with 14472 additions and 529 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
UnitConfigCellTCO.pas
View File

@@ -401,15 +401,16 @@ begin
formTCO[indexTCO].EditAdrElement.enabled:=true;
end;
Adr:=tco[indexTCO,XClicC,YClicC].Adresse;
With formConfCellTCO do
begin
GroupBoxOrientation.Visible:=false;
GroupBoxImplantation.Visible:=false;
GroupBoxCanton.Visible:=false;
GroupBoxDet.visible:=true;
if Adr<>0 then GroupBoxDet.visible:=true else GroupBoxDet.visible:=false;
GroupBoxAction.visible:=false;
end;
Adr:=tco[indexTCO,XClicC,YClicC].Adresse;
with formConfCellTCO.StringGridDet do
begin
@@ -623,7 +624,7 @@ begin
end;
// aiguillage ou TJD
if IsAigTCO(Bimage) then
if IsAigTJDCroiTCO(Bimage) then
formConfCellTCO.checkPinv.Enabled:=true
else formConfCellTCO.checkPinv.Enabled:=false;