delphiÖÐPDFÎļþµÄ¿ØÖÆ
´ó¼ÒºÃ,ÎÒ²ÉÓÃ:
import Activex
Acrobat Control for ActiveX
µ¼ÈëacrobatÍê³É¿Ø¼þ°²×°£¬ÔÚ³ÌÐòÀïдÈçÏ´úÂë¾Í¿ÉÒÔÁË£º
Pdf1.src := 'ÄãµÄÎļþ.pdf';
¿ÉÒÔÁ´½Óµ½PDFÎļþ,µ«ÊÇÏÔʾ³öÀ´µÄ¿ÉÒÔ±£´æ¸±±¾,»¹¿ÉÒÔ´òÓ¡µÈ,ÓÐûÓÐʲô·½·¨¿ÉÒÔ¿ØÖÆ,Ö»ÄÜÁ´½Ó³öÀ´,²»ÄܽøÐÐÈκβÙ×÷
Ïà¹ØÎÊ´ð£º
¸÷λºÃ£¡£¡
¼ÙÉèÎÒÓÐÁ½¸ötextÎļþ
Ò»¸öÃû½Ð 1.text
ÄÚÈÝ£º
I like PC....
ÁíÍâÒ»ÊÇ2.text
ÄÚÈÝ:
function yk as string
endfunction
globals
endglobals
***********************·Ö½çÏß********** ......
Ö÷´°Ìå:
Delphi(Pascal) code:
procedure TfrmMain.btnResumeClick(Sender: TObject);
begin
myThread := TClientThread.Create(LeftPart(cbbServer.Text, ':'), StrToInt(RightPart(cbbServer.Text, ':')) ......
Delphi(Pascal) code:
library HealthDocDll;
uses
SysUtils,
Classes,
Forms,
Dialogs,
Windows,
HealthDoc in 'HealthDoc.pas' {frmHealthDoc},
pub in 'pub.pas';
{$R *.res}
proced ......
¶¨Ò壺
type
pm= packed record { IO¼Ç¼ }
Name:string[16]; { IOÃû³Æ }
CHn:Byte; {ÊäÈëͨµÀºÅ }
Pvh:Double; { Á¿³ÌÉÏÏ ......