impressora fiscal sweda

Ola

Não consigo resolver.

e para imprimir uma leitura da memoria fiscal de uma sweda

com,a:integer;
Resp:String;
Retorno:Integer;
Comando: array[0..512] of Char;
Status:array[0..512] of Char;
Extensao:LongInt;
function ECFOpen(numero:longint;tempo:longint;log:longint;mostra:longint):integer; stdcall;
external ´SWECF.DLL´ index 1;
procedure ECFClose; stdcall;
external ´SWECF.DLL´ index 2;
function ECFWrite(Comando:PChar):longint; stdcall;
external ´SWECF.DLL´ index 3;
Function ECFRead(Status:PChar;Extensao:longint):Longint;stdcall;
external ´SWECF.DLL´ index 4;

procedure TLeituraMdata.BitBtn1Click(Sender: TObject);

var
datai, dataf:string
begin
datai:=´201203´;
dataf:=´201203´;

Comando := #27+´.16(data1)(data2)}´;
EcfWrite(Comando);
ECFRead(status,512);
form1.texto.Text:=status;

end;

sendo data1 a data incial e data2 a data final

esse linha eu fiz assim
Comando := #27+´.16´+datai+dataf+´}´;

quando executo da esse erro.

[Error] Unit_Leitura_Memoria_data.pas(47): Incompatible types: ´Array´ and ´String´

como resolver?

Valeu
Dart