Onionmixer: 소스코드 오류수정

2013-02-28T15:46:21Z

소스코드 오류수정

← Older revision		Revision as of 15:46, 28 February 2013
Line 499:		Line 499:
	szHelpFile : array[0..127] of AnsiChar;		szHelpFile : array[0..127] of AnsiChar;
	end;		end;
	~~%%nextpage~~
	function CPIApplet(hwndCPL: THandle; uMsg: Cardinal;		function CPIApplet(hwndCPL: THandle; uMsg: Cardinal;
	const lParam1: Longint; var lParam2: Longint): Longint; Stdcall;		const lParam1: Longint; var lParam2: Longint): Longint; Stdcall;
Line 628:		Line 628:
	Form1.ShowModal; // show is not enough		Form1.ShowModal; // show is not enough
	Form1.Free; // free the window		Form1.Free; // free the window
	Form1 := NIL; // %%... and set it to NIL		Form1 := NIL; // ... and set it to NIL
	Result := 0;		Result := 0;
	end // first applet		end // first applet
Line 641:		Line 641:
	end;		end;
	if Form2 = NIL then // Lazarus and Delphi		if Form2 = NIL then // Lazarus and Delphi
	Form2 := ~~TFor21~~.Create(Application);		Form2 := TForm2.Create(Application);
	Application.UpdateMainform(Form2); // Lazarus specific		Application.UpdateMainform(Form2); // Lazarus specific
	Form2.ShowModal; // Show is not enough		Form2.ShowModal; // Show is not enough
	Form2.Free; // free the window		Form2.Free; // free the window
	Form2 := NIL; // %%... and set it to NIL		Form2 := NIL; // ... and set it to NIL
	Result := 0;		Result := 0;
	end // second applet		end // second applet

Onionmixer: LCG 4.3 페이지 추가

2013-02-19T12:59:40Z

LCG 4.3 페이지 추가