求助：将下面几句C＋＋代码转到Delphi，主要有关字符串类型(50分)

U

uuid

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-22

• #1

bool openFile(char* fileName);
char fileName[128];
GetDlgItemText(IDC_EDIT1,fileName,128);
openFile(fileName);

 

Z

zw84611

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-22

• #2

function openFile(filename: pchar): BOOL;
var fileName: string;
fileName := Edit1.Text;
openFile(pchar(fileName));

 

死

死水

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-22

• #3

function openFile(fileNamechar):BOOL;
char fileName[0..127];
GetDlgItemText(IDC_EDIT1,fileName,128);
openFile(fileName);

 

U

uuid

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-22

• #4

接受答案了.