개정판 fa8a3260
issue #591 Nozzle 위치변경
| DTI_PID/SPPIDConverter/Main.vb | ||
|---|---|---|
| 5857 | 5857 |
Dim sValve_ID As String = "DB7B0CA8A2664A6BA7A9615764BA62B0" |
| 5858 | 5858 |
Dim objValve As LMSymbol |
| 5859 | 5859 |
Dim objValves As LMPipingComp = _Placement.PIDDataSource.GetPipingComp(sValve_ID) |
| 5860 |
|
|
| 5861 | 5860 |
objValve = _Placement.PIDDataSource.GetSymbol(objValves.Representations.Nth(1).Id) |
| 5862 | 5861 |
objValve.Commit() |
| 5863 | 5862 |
Dim dVesselX As Double = XCoordinate |
내보내기 Unified diff
