各位老大，在pascal程序（也可能是早期的delphi）里经常碰到move(Mem[Seg*16],Buffer,256);这个语句，可在delphi7里却行不通，不知在delphi6,delphi7里该怎么用呢？谢谢！

上面的Seg,Buffer都是变量，问题在于这个Mem，不知是何物？

好象要uses GRAPH, CRT, SVGA256; 可这些在delphi都没有啊。。。

Mem is a function exists in 16 bit Delphi 1 only. In 16 bit world there exists segment address and offset in accessing memory making a total of 20 bit address space.

谢谢william老大！ 原来是这样呀，可move(Mem[Seg*16],Buffer,256)这个语句在delphi7里该怎么改呢？能改吗？。。。

引言: Mem is a function exists in 16 bit Delphi 1 only. In 16 bit world there exists segment address and offset in accessing memory making a total of 20 bit address space.

引言:谢谢william老大！ 原来是这样呀，可move(Mem[Seg*16],Buffer,256)这个语句在delphi7里该怎么改呢？能改吗？。。。

Porting DOS application to Win32? Not trival task... assume Seg and Buffer are pointers in Delphi 32: move(Seg^,Buffer^,256); but 32 bit pointer is completely different from 16 bit pointer... perhaps rewritting the application is easier.

var Seg:word; move(Mem[Seg*16],Buffer,256)是否指在内存中从Seg*16开始copy 256 字节内容到Buffer？ 用move(Seg^,Buffer^,256)时提示“Pointer type required”...    我本来是要用来判断显存容量的，里面夹了很多汇编，rewritting 对我等菜鸟实在太难了。。。我再想想办法看    

引言: var Seg:word; move(Mem[Seg*16],Buffer,256)是否指在内存中从Seg*16开始copy 256 字节内容到Buffer？ 用move(Seg^,Buffer^,256)时提示“Pointer type required”... 我本来是要用来判断显存容量的，里面夹了很多汇编，rewritting 对我等菜鸟实在太难了。。。我再想想办法看 < face="Verdana, Arial, Helvetica"> Mixed with 16 bit assembly? Then you are out of luck, Delphi 32 inline assembler can only accept 32 bit assembly language. Seg and Buffer need to be pointer type (e.g. pointer, PChar... etc).

哎呀，那岂不完了？难怪我在编译汇编部分时也出错了，算了，看来这次是白忙喽。。。

I think your application is a DOS applicaiton. Perhaps you could try the old Borland Pascal/Turbo Pascal for DOS.    Get TP 5.5 here http://bdn.borland.com/article/0,1410,20803,00.html Something about SVGA BGI driver (TP7) http://groups.google.com.hk/groups?hl=zh-TW&lr=&ie=UTF-8&threadm=3593100D.79FDB46F%40hotmail.com&rnum=6&prev=/groups%3Fq%3Dsvga256.bgi%26hl%3Dzh-TW%26lr%3D%26ie%3DUTF-8%26selm%3D3593100D.79FDB46F%2540hotmail.com%26rnum%3D6

我也想过用delphi1.0和TP......总之一有时间,我就得给自己加油,毕竟提高自己才是根本 谢谢