Jump to content

Import fichier geomètre et terrain 3D


ACA ATOP

Recommended Posts

Bonjour

Je cherche le process pour créer un terrain 3D à partir d'un relevé géomètre format DWG.

Dans mon cas le fichier géomètre indique les hauteurs de point de niveau sans les positionner  en hauteur (coordonnées z).

Merci d'avance!

Link to comment
Share on other sites

Bjour,

Si je comprend bien votre problème, vous avez un plan topo importé dans VW depuis un DWG de géomètre mais les points sont en 2D avec des altimétries en texte.

la question est alors:

Comment convertir des textes du style "101,14" en point 3D ayant comme coordonnées x et y les coordonnées d'insertion du texte et z=101,14 ?

Voici un bout de script qui fait ça :
 

PROCEDURE txt2pt3d;
{Patrick Forest - Aout 2017}

VAR
obHd : HANDLE;
Txt: string;
vX: Real;
vY: Real;
vZ: REAL;
vOr: Real;
vM: boolean;
delta : REAL;

BEGIN
    obHd:=FSACTLAYER;
        WHILE obHd<>NIL DO BEGIN
        If(GetTypeN(obHd)=10) then begin
            vX:=0;vY:=0;vZ:=0;
            GetTextOrientation(obHd, vX, vY,vOr,vM);
            Txt:=GetText(obHd);
            vZ:=Str2Num(Txt);
            If(vZ>0)then Locus3D(vX,vY,vZ);
        End;
        obHd:=NEXTSOBJ(obHd);
    END;
END;

RUN(txt2pt3d);

Mode d'emploi :

1/ copier-coller ce code dans une nouvelle ressource de type [Script]

2/ placez vous sur votre plan topo, sélectionnez les textes à convertir et lancez le script

Aucune donnée de votre plan ne sera modifiée ou supprimé mais des points 3D seront créés.

 

En cette période de confinement, n'hésitez pas à me contacter si besoin.

Link to comment
Share on other sites

  • 4 weeks later...

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...

Important Information