ListView 可編輯

virgoboy20發表於2010-05-15
ListView本不可以直接編輯,一般是使用模擬一個輸入物件,來進行編輯,然後再儲存回去。

下面就是介紹了這個方法 用的不是C# 但思路可以借鑑

[@more@]unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls;

type
TForm1 = class(TForm)
ListView1: TListView;
Edit1: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
procedure Edit1Exit(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
if ListView1.SelCount < 1 then Exit;
Edit1.Left := ListView1.Left + ListView1.Column[0].Width + 5;
Edit1.Top := ListView1.Top + ListView1.Selected.Top;
Edit1.Text := ListView1.Selected.SubItems.Strings[0];
Edit1.Visible := True;
Edit1.SetFocus;
end;

procedure TForm1.Edit1Exit(Sender: TObject);
begin
ListView1.Selected.SubItems.Strings[0] := Edit1.Text;
Edit1.Visible := False;
end;

來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/8780503/viewspace-1033627/,如需轉載,請註明出處,否則將追究法律責任。

相關文章