|
답변 감사합니다...정말 감사합니다.
송구스럽지만....ㅠ.ㅠ
밑에 것도 좀 확인 좀 해주시겠습니까?
with List, fmWatchProperties do
begin
DebugWatches := Scripter.CurrentScript.VirtualMachine.DebugWatches;
DebugWatch := TatDebugWatch(Items.Objects[ItemIndex]); // [3]
end;
어떤 식으로 변환해야 좋은 것인지 모르겠습니다...ㅜ.ㅜ
한수 지도 부탁드립니다...
유영인 Cuperido 님이 쓰신 글 :
: 1의 경우에는
: fmWatchViewer = new TfmWatchViewer(this) ;
:
: 2의 경우에는
: 포인터 변환이 필요없으면, 함수 자체를 const int 가 아닌 int 로 넘겨 받으시면 되고,
: 그렇지 않은 경우에는
: FDebugWatch = (TatDebugWatch *)Value;
:
: 이렇게 하시면 될 것 같습니다.
:
: cuperido
:
:
: 송동국 님이 쓰신 글 :
: : 안녕하십니까?
: : 고수님들에게 도움 받고자 몇자 글 올립니다..
: : 부탁드립니다..꼭...ㅠ.ㅠ
: : ---------------------------------------------------------
: : procedure TDebugForm.FormCreate(Sender: TObject);
: : begin
: : fmWatchViewer := TfmWatchViewer.Create(self); /// [1]
: : fmWatchViewer.Scripter := atPascalScripter1;
: : end;
: :
: : ------------------------------------------------------
: : TatDebugWatch* FDebugWatch
: :
: : procedure TfmWatchViewer.SetDebugWatch(const Value: TatDebugWatch);
: : begin
: : FDebugWatch := Value; /// [2]
: : end;
: :
: : C++ 코드..
: : void __fastcall TfmWatchViewer::SetDebugWatch( const TatDebugWatch* Value)
: : {
: : FDebugWatch = Value; /// [3] Error 납니다..
: : }
: : ----------------------------------------------------------
: : C++ 코드로 바꿀때 어떻게 해야 할지...ㅠ.ㅠ
: : [1] 부분을 어떻게 해야 하는지 모르겠군요...조언 부탁드립니다.
: : [2] 부분은 const TatDebugWatch* 와 TatDebugWatch*와 맞지 않다고 하는데...ㅜ.ㅜ 좀 도와 주십시요..
: :
: : 꼭 부탁드립니다..
|