¹«Ë¾ÓÐÒ»Èí¼þ£¬ÊµÏֵŦÄÜÊÇ¿ÉÒÔÔ¶³ÌÊÓÆµÁÄÌì¡£¡£Óõ½ÁË¡°DirectShow9¡±£¬ÏÖÔÚÏëÕÒ³öDELPHIÊÇÈçºÎ½«±¾µØÊÓÆµ×ª»¯Îª¿É´«Êä¸ñʽµÄÄǶδúÂë¡£¡£Ï£ÍûÓоÑéµÄ¸ßÊÖ°ïÏÂæ¡£
ÒÔÏÂÊÇ¡°DirectShow9¡±ÖеIJ¿·Öº¯Êý
function put_Caption(strCaption: WideString): HResult; stdcall;
function ......
delphi ÀûÓà µ÷Óà office outlook 2003 ·¢Óʼþ Òѳɹ¦£¬µ«ÊÇ¡£¡£¡£
ÿ´ÎÔÚ·¢ËÍÓʼþʱ¶¼»áµ¯³öÀ´Ò»¸öÈ·ÈÏ´°¿Ú£¬ÐèÒªÊÖ¹¤µãÊDzÅÄÜ·¢ËÍ¡£²¢ÇÒǰºóÒªµãÈý´Î²ÅÄܳɹ¦·¢ËÍ¡£
ÈçÏÂͼ£º
ÒòΪÎÒÒª×öµÄÈí¼þÿÌì¶¼ÓдóÁ¿µÄÓʼþҪͨ¹ýoutlookÁ¬½Óexchange server·¢ËÍÓʼþ£¬²¢ÇÒÊÇ×Ô¶¯·¢Ë͵ġ£
ÓÐʲô°ì·¨Êµ¼ÊoutlookµÄÒþʽµ÷ÓÃÂ𣿼 ......
СµÜ×î½ü¼±×Å×öÒ»¸öC/S½á¹¹µÄС³ÌÐò£¬¾ÍÊÇÔÚ¾ÖÓòÍøÄÚ£¬Ó÷þÎñÆ÷¶Ë³ÌÐòʵÏÖ·¢²¼ÐÅÏ¢ , ÐÅÏ¢±íÖ»ÐèÒª ±àºÅ(ID),·¢±íʱ¼ä£¨time£©ºÍÄÚÈÝ(Content) ¾ÍOKÁË£¬¿Í»§¶Ë°²×°ÔÚ¾ÖÓòÍøµÄÆäËüµçÄÔ£¬µ±ÕâЩװÓпͻ§¶ËµÄµçÄÔÆô¶¯ºó£¬×Ô¶¯ÔËÐпͻ§¶Ë³ÌÐò£¬µ¯³öÒ»´°¿ÚÏÔʾ×îÐÂÒ»ÌõÏûÏ¢ÄÚÈÝ£¡
СµÜÒòºÜ¾ÃÒÔǰѧ¹ýһЩDelphiµÄƤ룬à ......
tuxedo8.1ÖиøµÄÀý×ÓC:\bea\tuxedo8.1\samples\atmi\simpapp ÎÒÒѾÕýÈ·±àÒëÁË ÔÚÃüÁîÐÐÀïÃæÒ²¿ÉÒÔÓõġ£
ÎÒÏÖÔÚµÄÎÊÌâÊÇÔõôÓÃdelphiÈ¥µ÷ÓÃÄǸösimpclº¯Êý£¨Àý×ÓÖеĺ¯Êý£©£¬ÎÒ¸ÃÔõôȥÒýÈëDLLÎļþ£¬Ôõôȥµ÷ÓÃtpinit tpcallµÈ¡£
ËÒªÊÇÓÐÕýÈ·µÄÇ®Ìù³öÀ´£¬Ð»Ð»£¡
ÔÚÏßµÈ ¸ø·Ö100·Ö£¡
ÊÇDLLµÄ»¹ÊÇCOM+µÄ£¿
DLL ......
ÓдúÂëÈçÏ£º
Delphi(Pascal) code:
var
Form1: TForm1;
a, b, c, d, e: Integer;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
f, g, h, i, j: Integer;
begin
ListBox1.Items.Add(IntToStr(a));
ListBox1.Items.Add(IntToStr(b));
ListBox1.Items.Add( ......
ÊÇÕâÑùµÄ£¬ÎÒÏë°ÑÒ»¸öÎļþ¼Ð£¨ÀïÃæÓÐÄÚÈÝ£©ÖÆ×÷³ÉexeÔËÐÐÎļþ£¬ÔËÐкó¾ÍÉú³ÉÕâ¸öÎļþ¼Ð¡£ÏñÒ»¸öѹËõ°üÒ»Ñù£¬²»¹ýºó׺ÃûÊÇexe¡£ÈçºÎÖÆ×÷ÄØ£¿
Õâ¸öÖ±½ÓÓÃWINRARÀ´Åª¾ÍÐÐÁ˰ɣ¿
ÒýÓÃ
Õâ¸öÖ±½ÓÓÃWINRARÀ´Åª¾ÍÐÐÁ˰ɣ¿
»¹ÄܼÓÃÜÂëÄØ
ÒýÓÃ
Õâ¸öÖ±½ÓÓÃWINRARÀ´Åª¾ÍÐÐÁ˰ɣ¿
ÓÃwinrar¿ÉÒÔÖÆ×÷exeÎļþ£¿ºÃÏñ²»Ð ......