Syntax Highlighing:
comments, key words, predefined symbols, class members & methods, functions & classes
# Find attached record with highest value in COOM_GEOmod.FROM field
num = SetNum (COOM_GEOmod[*])
bottom = 1;
for i = 1 to num begin
if (COOM_GEOmod[bottom].FROM < COOM_GEOmod[i].FROM) begin
bottom = i
end;
end;
# make a string for your data tip:
myString$ = TABLE.HOLE_ID + "\n" +
"BOH:" + NumToStr(TABLE.FINAL_D) + "m" + "\n" +
"Basement: " +TABLE.BASEMENT + "\n" +
"Bottom is from : " + NumToStr(COOM_GEOmod[bottom].FROM) +
" to " + NumToStr(COOM_GEOmod[bottom].TO) + "\n" +
"Bottom is " + COOM_GEOmod[bottom].LITH1
# myString$ = NumToStr(i);
return myString$
Download