아래의 소스처럼 프로퍼티를 생성해서 사용했습니다.
그런데 프로퍼티를 변경해도 값이 반영되지 않더군요.
프로퍼티 값을 변경시 어떤 오퍼레이션을 해야합니까?
참고로 내부에 있는 함수에서 m_strUserID를 참조해서 사용합니다.
그런데 컨트롤의 UserID프로퍼티 값을 입력하고 실행하면
내부에 있는 함수 CheckID()에서 m_strUserID가 아무런 값이 없습니다.
아마도 프로퍼티 값이 변경되지 않았나 봅니다.
델파이로는 처음 해보는 중이라....
private
m_strUserID:String;
procedure Set_UserID(const Value: WideString); safecall;
function Get_UserID: WideString; safecall;
.
.
.
procedure TTUpLoad.Set_UserID(const Value: WideString);
begin
m_strUserID := String(Value);
end;
function TTUpLoad.Get_UserID: WideString;
begin
Result := WideString(m_strUserID);
end;
procedure TTUpLoad.CheckID();
begin
ShowMessage(m_strUserID);
end;