Thanks, I solve this problem. If you use delphi you should write as folowing:
.....
var Task :PLongint; Error :Longint
begin
//function DAQmxCreateTask(taskName:PChar; taskHandle:PLongint):Longint; stdcall; from nicaiu.dll
Error:=DAQmxCreateTask('Analog Input', Task);
// and now you can create AI channel
......
but this code not working, solution is very simple
.....
var Task, Error :Longint
begin
//function DAQmxCreateTask(taskName:PChar; taskHandle:PLongint):Longint; stdcall; from nicaiu.dll
Error:=DAQmxCreateTask('Analog Input', @Task);
// and now you can create AI channel
DAQmxCreateAIVoltageChan(Task,'Dev1/ai1','P0', DAQmx_Val_Coupling1_DC,10,-10,DAQmx_Val_VoltageUnits1_Volts ,nil);
......