風花雪月 e夢情緣
網路代號:wnhoo or sos_admin
網名:e夢緣
mail:
功能:第一次執行的時候…會開啟project1.exe
第二次執行的時候…不開啟project1.exe(因程式已執行)…但會將引數會丟給已執行的project1.exe
第3次執行的時候…不開啟project1.exe(因程式已執行)…但會將引數會丟給已執行的project1.exe
...[公共單元檔案]
unit unlib;
inte***ce
type
par = record
str1 : string[255];
str2 : string[255];
str3 : string[255];
end ;
implementation
end.
[工程檔案]
program project1;
uses
forms,
unit1 in 'unit1.pas' ,
windows,
messages,
dialogs,
unlib in 'unlib.pas';
[單元檔案]
unit unit1;
inte***ce
procedure createparams(var params:tcreateparams);override;
procedure restorerequest(var msg:twmcopydata);message wm_copydata;
end;
varform1: tform1;
implementation
procedure tform1.restorerequest(var msg:twmcopydata);
varrexdata :tcopydatastruct ;
ppar: ^par ;
begin
if msg.copydatastruct<> nil then
begin
rexdata := msg.copydatastruct^ ;
ppar:= rexdata.lpdata ;
if ppar^.str1='' then
memo1.lines.add('not parameter')
else
memo1.lines.add (ppar^.str1);
if ppar^.str2='' then
memo2.lines.add('not parameter')
else
memo2.lines.add (ppar^.str2);
if ppar^.str3='' then
memo3.lines.add('not parameter')
else
memo3.lines.add (ppar^.str3);
end ;
end;
end.
函式間傳遞引數
function example num example 10 自定義函式簡單示例 結果為 10 10 100 在函式間傳遞引數 1,按值傳遞方式 function example m m 1 example m echo 在函式外 m m 結果為 在函式內 a 15 在函式外 a 1 2,按引用傳...
頁面間引數傳遞
asp.net提供了卓越的事件驅動程式設計模型,讓開發者簡化了應用程式的總體設計,但是這個也造成了它固有的一些問題,例如,使用傳統的asp裡,我們可以通過使用post方法很容易地實現頁面間傳遞值,同樣的事情,在使用事件驅動程式設計模型的asp.net就不是那麼容易了,當然了,我們仍然有一些方法可以實...
C 執行緒間傳遞引數
我們如果定義不帶引數的執行緒,可以用threadstart 帶乙個引數的用parameterizedthreadstart。帶多個引數的用另外的方法,下面逐一講述。一 不帶引數的 c sharp view plain copy using system using system.collection...