菜鸟关于API的求救！SoS！(100分)

本菜鸟原来是学VB的，现在改学delphi后对delphi的Api调用不太熟悉！请问各位高手，下<br>面这段安装输入法的VB中的API在delphi中如何实现，如有可能请给出详细代码！<br><br><br>Private Declare Function ImmInstallIME Lib "imm32.dll" Alias "ImmInstallIMEA" (ByVal lpszIMEFileName As String, ByVal lpszLayoutText As String) As Long<br><br>麻烦各位了！

放在类的外面：<br>function DoSomething(lpszIMEFileName,lpszLayoutText:String):integer; external 'imm32.DLL' name 'ImmInstallIMEA';stdcall;

Function ImmInstallIME(lpszIMEFileName,lpszLayoutText:String):integer; external 'imm32.dll' name 'ImmInstallIMEA';

在uses中加入Ｉｍｍ，注意两个参数是pchar类型就可以了．

至于吗?<br>IMM.pas是Borland已经编好的

谢谢各位的解答，现在代码为<br><br>unit Unit1;<br><br>interface<br><br>uses<br>&nbsp; Windows,imm, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,<br>&nbsp; StdCtrls;<br>type<br>&nbsp; TForm1 = class(TForm)<br>&nbsp; &nbsp; Button1: TButton;<br>&nbsp; &nbsp; procedure Button1Click(Sender: TObject);<br>&nbsp; private<br>&nbsp; &nbsp; { Private declarations }<br>&nbsp; public<br>&nbsp; &nbsp; { Public declarations }<br>&nbsp; end;<br><br>var<br>&nbsp; Form1: TForm1;<br>lpszLayoutText : pchar;<br>lpszIMEFileName : pchar;<br><br>implementation<br><br>{$R *.DFM}<br><br>procedure TForm1.Button1Click(Sender: TObject);<br>begin<br>lpszLayoutText := '冷僻字五笔';<br>lpszIMEFileName := 'my.ime';<br>end;<br><br>end.<br><br>如何在按钮按下后用上面两个变量的参数完成输入法安装呢？我在在类里面已经加<br>入了imm，好像按钮事件里面还需要一个调用api的命令吧，请高手指教！

ImmInstallIME(lpszIMEFileName,lpszLayoutText);

谢谢各位的解答！问题已解决！还想再问一个问题，delphi程序后我想这样加一个参数<br><br>aaa.exe /f:123.ime /t:我的输入法<br><br>以实现通用输入法安装程序，如何实现