掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TreeViewで最後に開いたノードを開かせるには (ID:16612)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
とりあえず… ちからワザで、できたような感じがしますが、 もっとスマートな方法がございましたら、アドバイスをお願いいたします…<(_ _)> While (s <> ZenkaiNoFolderPath) and (i < (TreeView1.Items.Count-1)) do begin s := TreeView1.Items[i].text; TN := TreeView1.Items[i].Parent; while Assigned(TN) do begin if RightStr(TN.Text ,1 ) = '\' then begin s := TN.Text+s; end else begin s := TN.Text+'\'+s; end; TN := TN.Parent; end; i := i +1; end; TreeView1.Items[i-1].Selected := true;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.