Tweet
Hallo Leute,
ich setzte CBuilder 5.0 Prof. ein. Ich greife über die OLE Automation Schnittstelle auf Leitz ELO zu. Das schlimme ist ich bekommen beim Compilieren ein Unzahl von Fehlermeldungen. Unter BCB 1.0 kein Problem aber mit BCB 5 schon. Hier der Code
int iEloId =0; int Fehler =0; AnsiString sString = Trim(ADOQuery1Vorname->AsString)+" "+ Trim(ADOQuery1Nachname->AsString)+" "+ Trim(ADOQuery1Kudennr->AsString); EloServer = CreateOleObject("LeitzElo.Elo32o"); <-- F iEloId=EloServer.OleFunction("LookupIndex","!Kunde n/"+sString); <-- F EloServer.OleFunction("GotoId",(0-iEloId)); <-- F if (EloServer < 0) { EloServer.OleFunction("PrepareObject",0,2,0); EloServer.OlePropertySet("ObjShort",sString); EloServer.OlePropertySet("ObjMemo" ,sString); EloServer.OlePropertySet("ObjIndex","!Kunden"); EloServer.OlePropertySet("ObjFlags", 2); } Fehler =EloServer.OleFunction("UpdateObject");
Was mache ich falsch ????????????????????????????????
Danke jörg
ich setzte CBuilder 5.0 Prof. ein. Ich greife über die OLE Automation Schnittstelle auf Leitz ELO zu. Das schlimme ist ich bekommen beim Compilieren ein Unzahl von Fehlermeldungen. Unter BCB 1.0 kein Problem aber mit BCB 5 schon. Hier der Code
int iEloId =0; int Fehler =0; AnsiString sString = Trim(ADOQuery1Vorname->AsString)+" "+ Trim(ADOQuery1Nachname->AsString)+" "+ Trim(ADOQuery1Kudennr->AsString); EloServer = CreateOleObject("LeitzElo.Elo32o"); <-- F iEloId=EloServer.OleFunction("LookupIndex","!Kunde n/"+sString); <-- F EloServer.OleFunction("GotoId",(0-iEloId)); <-- F if (EloServer < 0) { EloServer.OleFunction("PrepareObject",0,2,0); EloServer.OlePropertySet("ObjShort",sString); EloServer.OlePropertySet("ObjMemo" ,sString); EloServer.OlePropertySet("ObjIndex","!Kunden"); EloServer.OlePropertySet("ObjFlags", 2); } Fehler =EloServer.OleFunction("UpdateObject");
Was mache ich falsch ????????????????????????????????
Danke jörg