1樓：匿名使用者
假設新視窗單元名稱為newfrm，窗體名稱為newform,dbgrid中的資料與cds1關聯，cds1中有name、password......列 先引用newfrm，在雙擊事件begin前新增 var newform1： tnewform;
begin
newform1 := tnewform.create(nil);
trynewform1.edtname.text := cds1.fieldbyname('name').asstring;
newform1.edtpassword.text := cds1.fieldbyname('password').asstring;
......
newform1.showmodal;
finally
newform1.free;
end;end
2樓：0o小刀
首先,定義乙個全域性變數,然後在dbgrid雙擊函式中進行傳參,最後在新視窗使用傳遞的引數進行查詢,並將查詢到的資料填入相應的edit中
我的例子是使用oracle資料庫,使用房號進行的查詢
主視窗**
varroomid:integer; //傳遞引數
//詳細資訊
procedure tmainform.dbgrid3dblclick(sender: tobject);
begin
if not assigned(infoform) then
infoform:=tinfoform.create(self);
roomid:=dm.oraquery_room.fields[0].asinteger; //dm是資料視窗
infoform.showmodal;
end;
子視窗**
//初始化
procedure tinfoform.formshow(sender: tobject);
begin
with dm.oraquery_info do
begin
dm.oraquery_info.close;
dm.oraquery_info.active:=false;
dm.oraquery_info.sql.clear;
dm.oraquery_info.sql.add('select * from 表1 ');
dm.oraquery_info.sql.add(' where code='+quotedstr(inttostr(roomid)));
dm.oraquery_info.active:=true;
dm.oraquery_info.open;
edit1.text:=dm.oraquery_info.fields[0].asstring;
edit2.text:=inttostr(roomid);
end;
DELPHI7開發的系統介面按鈕會突然消失怎麼解決
在 windows 中，alt 鍵是個基本功能鍵，單獨按下的話，效果是輸入焦點切換到程式的主選單上。而輸入焦點切換到主選單時，普通程式不會有什麼影響，特定程式 如通過特定方式製作選單等 會引起窗體大小和位置有一定調整，具體根據軟體而定。由於你沒有 只能建議你從這兩個方面去找原因 檢查你的程式是否對主...
win7的雙ip到底怎麼弄啊，WIN7的雙IP到底怎麼弄啊
win7雙ip設定 假設有兩台路由器，一台路由器ip是192.168.1.1 另一台路由器ip是192.168.2.1 參見路由器盒子上的標籤或說明書。那麼本機雙ip的設定如下 1 點右下角的網路標誌，滑鼠右鍵選擇開啟網路和共享中心 2 點本地連線或者無線網路連線 3 點屬性 4 選擇tcp ipv...
怎樣安裝windows7與linu的雙系統
8g不夠 另外，你是怎麼安的？怎麼裝的？安裝盤有問題吧？一台電腦上怎麼安裝windows 和linux雙系統 首先安裝雙系統的方法有很多，可以先安裝windows再安裝linux，也可以先安裝linux再安裝windows。二者的區別在與windows不能識別linux的檔案系統，換句話說就是嗎，先...