X xieyj Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-19 #1 在DELPHI中，怎样可以把数字转用图片表达出来，比如我有一图形名为1.GIF， 如果是1时就用1这个图片表示出来！
S sun77wind Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-19 #2 自己建立一个对应表不就行了吗 1--〉1.gif 2-->2.gif 3-->a.gif 4-->b.gif
A alvinlv Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-19 #3 function getImageFile(index: integer) : String; begin Result := IntToStr(index) + '.gif'; end; procedure tfor1.button1click(sneder: tobject); begin gifImage.loadformfile(getImageFile(i)); end; // 其中gifImage 为gif图片显示控件, i 为你要显示的gif的名例如1,2,3,4等.
function getImageFile(index: integer) : String; begin Result := IntToStr(index) + '.gif'; end; procedure tfor1.button1click(sneder: tobject); begin gifImage.loadformfile(getImageFile(i)); end; // 其中gifImage 为gif图片显示控件, i 为你要显示的gif的名例如1,2,3,4等.
