卡奔里的曲线能不能批量的倒出来呢？ [复制链接]

没有原始的曲线，只有一些卡奔图，能不能批量的把测井曲线数据倒出来呢

不能，好似要一条条导出

可以
打开一口井的图，复制全图，黏贴

楼上的详细说一下吧，不太明白你的意思

好像是不行，复制了粘贴进去倒是可以

不可以吧

引用第2楼husong于2010-09-08 23:05发表的 :
可以
打开一口井的图，复制全图，黏贴

希望您详细指点一下

啊，不好意思，我以前那样全部复制是就在卡奔里做图，导出来的话，试了下不行。只能一个一个导。不好意思啊，误导了

卡本没这么高级吧

可以用宏程序实现，但标识必须和脚本中的一致
object v = new File;
float sdep ,edep ;
string filename ;
sdep = Input("输入起始深度 ：" ,600);
edep = Input("输入结束深度 ：" ,1000);
filename = Input("输入文件名 : " , "sample");
if (v.Create("D:\\"+filename+".txt")) {
    v.textline = "FORWARD_TEXT_FORMAT_1.0";
    v.textline = "STDEP =" + "\t" + sdep ;
    v.textline = "ENDEP =" + "\t" + edep ;
    v.textline = "RLEV  =" + "\t" + "0.1250";
    v.textline = "CURVENAME =SP,DEN,AC,RILD" ;
    v.textline = "END";
    v.textline = "   DEPTH       SP   DEN       AC    RILD";
    for ( depth = sdep ; depth <= edep ; depth += 0.125) {
//        v.textline = fcvt(depth, 4, 3) + "\t" + fcvt(SP,4, 2) + "\t" + fcvt(Den, 1, 2) + "\t" + fcvt(AC,4,2) +"\t" + fcvt(RILD,3,2);
        v.textline = fcvt(depth, 4, 3) + "  " + fcvt(SP,4, 2) + "  " + fcvt(Den, 1, 2) + "  " + fcvt(AC,4,2) +"  " + fcvt(RILD,3,2);
    }
    MsgBox("File output OK!",MB_OK);
}