Displaying 5 results from an estimated 5 matches for "tobject".
Did you mean:
object
2009 Feb 20
2
OLEDB not work !
Hi everybody
I have a program , it work good under window98 / 2000 /xp .
It use oledb (client supported by mdac2.7 or later version) direct link MS SQL Server 2000 .
with wine it do not work. I set up mdac 2.8 sp1 , no change
by google , i found too many program can not work (oledb not support)
can anybody help me ?
2007 Mar 19
1
Delphi applications printing bug
...orks regularly under Windows ("doesn't
work" meens that nothing is encoded in the printing spool... and the
only error that is shown is "fixme:psdrv:PSDRV_EndPage Already ended a
page?")
Ie, this code works both under Windows and Wine:
procedure TForm1.Button2Click(Sender: TObject);
var SetupDialog: TPrinterSetupDialog;
begin
SetupDialog:= TPrinterSetupDialog.Create(Application);
SetupDialog.Execute;
with Printer do
begin
BeginDoc;
Canvas.TextOut(100, 100, 'Test');
EndDoc;
end;
end;
...while this code works only under Win...
2006 Jun 20
1
DAO 3.5 and OLEAUT32.DLL troubles...
...?
fixme:ole:MSFT_ReadValue BSTR length = -1?
----
Replacing the builtin OLEAUT32.DLL with the native DLL everything works
ok.
Is this a known bug or should I post it in the Bugzilla?
bye!
Paolo
This is an extract of the procedure that causes the problem:
procedure TForm1.Button1Click(Sender: TObject);
var
daodbeng: DAODBEngine;
daodb: DAODatabase;
daors: DAORecordset;
begin
try
daodbeng:= OpDAO35.CreateEngine; // Crea il DBEngine, e passa
internamente la licenza
daodb:=
daodbeng.OpenDatabase(ChangeFileExt(Application.ExeName, '.mdb'),
false, false, '...
2010 Sep 02
1
XmlHttpObject
Hello!
Is there a reason why applications using xmlhttprequest don't work?
Simple Delphi code.
Uses comobj;
procedure TForm1.Button1Click(Sender: TObject);
var xmlhttp: variant;
begin
xmlhttp:=createoleobject('MSXML2.XMLHTTP.3.0');
xmlhttp.open('GET', edit1.text, true);
xmlhttp.send();
while (xmlhttp.readystate<>4) do application.processmessages;
memo1.lines.add(xmlhttp.responsetext);
end;
Screen cap: http://netikka....
1998 Oct 23
1
conflicts() and masked()
...ind <- c("last.dump", "last.warning", ".Last.value", ".Random.seed")
objects.same <- match(objects(i), objects(pos), nomatch = 0)
if(any(objects.same))
if(length(same <- f.without( objects(pos)[objects.same], dont.mind)))
cat("\n\tObject(s) of the SAME name are in pos.", i, ":\n\n\t",
same, "\n\n")
}
}
invisible(value)
}
f.without <- function(set, elements)
{
## Purpose: return set WITHOUT elements { s1, s2,...} \ { e1, e2, ..}
## -------------------------------------------------------...