AddDataDim xdatax() As Byte   xdatax() = StrConv(Text1(1).Text, vbFromUnicode)   JRStegano1.Adddata xdatax() |
JR-Stegano Activex Beispiel |
AddDataDim xdatax() As Byte   xdatax() = StrConv(Text1(1).Text, vbFromUnicode)   JRStegano1.Adddata xdatax() |