关于delphi 编程环境(100分)

L

lj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-01-06

• #1

下面一段程序,delphi 编程环境中运行结果正确,但从新启动windows32直接
运行却得到空值,要在delphi 编程环境中运行一次后才得到正确的值?
uses DbiTypes, DbiProcs, DbiErrs;
procedure Whatever;
var
szVar: array[0..200] of char;
begin
DbiGetNetUserName(szVar);
edit1.text := szVar;
end;

 

J

Judith

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-01-06

• #2

Please try use
function DbiInit (pEnv: PDbiEnv): DBIResult stdcall;
to initialize the BDE environment first.

see BDE32.hlp

 

D

delphi fan2

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-01-06

• #3

uses DbiTypes, DbiProcs, DbiErrs;procedure Whatever;var
szVar: array[0..200] of char;
begin

DbiGetNetUserName(Pchar(szVar));
edit1.text := Pchar(szVar);

end;
试一试！

 

L

lj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-01-07

• #4

我用的是delphi1.0 ，上novell 网，delphi fan2和Judith 的方法我
在delphi4.0上试过,都不行。这段程序在delphi4.0上得不出正确答案.
真是奇怪.

 

L

lj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-01-23

• #5

多人接受答案了。