各位大大：

下面是我部分的程式，如果我一直執行BitBtn1的事件的話，有可能會發生問題嗎?
因為我主要是要執行GetData，所以我想說TReadData.Create(False);擺在FormCreate
的事件，然後把procedure GetData;改成public讓我可以在主程式用它，將BitBtn1的事件
改成TReadData.GetData這樣子可行嗎?

主程式
[code delphi]
unit Main;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls, Menus, Buttons, jpeg, ComCtrls, StrUtils,
Global, DataRead;
type
TMainForm = class(TForm)
procedure BitBtn1Click(Sender: TObject);

procedure TMainForm.BitBtn1Click(Sender: TObject);
begin
TReadData.Create(False);
end;
[/code]

副程式
[code delphi]
unit DataRead;
interface
uses
Classes, SysUtils, ActiveX, ComObj, Global, strutils,
DataWrite;

type
TReadData = class(TThread)
private
{ Private declarations }
protected
procedure Execute; override;
procedure GetData;
end;

procedure TReadData.Execute;
begin
CoInitialize(nil);
GetData;
CoUninitialize;
end;

[/code]