Guten Tag
Ich benutze Delphi 2009 und die OCX Komponente SAPLogonControl von SAP und zwar in der Unicodeversion. Nun versuche ich, mittels Silent Login eine Verbindung zu einem SAP System aufzubauen mit folgendem Quelltext:
Delphi-Quellcode:
SAPLogonControl1 :=TSAPLogonControl.Create(Self);
cnSAP :=SAPLogonControl1.newConnection;
qrtest.First;
while not qrtest.Eof do
begin
msgh := DateTimeToStr(now)+' '+qrtest.Fields[0].AsString+'/'+qrtest.Fields[3].AsString+':';
cnSAP.System := qrtest.Fields[0].AsWideString;
cnSAP.SystemNumber := qrtest.Fields[1].AsWideString;
cnSAP.ApplicationServer := qrtest.Fields[2].AsWideString;
cnSAP.Client := qrtest.Fields[3].AsWideString;
cnSAP.User := 'U215301';
cnSAP.Password :=Edit1.Text;
if cnSAP.Logon(0,True) = true then
begin
msgi := 'INF: Login erfolgreich';
logwrt(msgh+' '+msgi);
end
else
begin
msgi := 'ERR: Login fehlgeschlagen.';
logwrt(msgh+' '+msgi);
cnSAP.LastError;
end;
cnSAP.Logoff;
qrtest.Next;
end;
Mittels Silent Logon funktionieren die Verbindungen nicht und wenn ich es mit den genau gleichen Daten mit einer non-silent Verbindung (also: cnSAP.Logon(0,False) versuche, dann funktionieren alle Verbindungen einwandfrei. Habe ich ein Problem mit
Unicode (ich dachte, Delphi 2009 unterstützt
Unicode und habe deshalb auch die
Unicode Komponenten von SAP gewählt) ?
Weiss ev. jemand einen Rat ?