My Delphi/Intraweb application uses a TMS TTIWDBAdvWebGrid associated with a dynamically created TClientDataSet via a TDatasource component. The idea is to allow a user to page through a large amount of records using the controller, and optionally enter values in the last DynEdit column. The paging works fine for all columns, aside from ...
Is there a way to elevate privileges to the level required to write files to a network folder with our Delphi 2006 (Win32) application? The user running the application does not have permission to write (or view) files in the network folder in question. Any recommended techniques or alternative suggestions? ...
Hello, I got a request to implement Column-level privileges, for example: GRANT UPDATE("column1") ON "TABLE" TO ROLE; But I found that client applications ( in Delphi+ODAC ) always emits SQL updates like: update TABLE set column1=:column1,column2=:column2,column3=:column3,...etc where id_c=:id_c; what causes Oracle to always thro...
In other words: Does this work, i.e. is the encoding of the parameter taken into account when generating the unicode string result? function Test: string; var Pattern: string; Parameter: UTF8String; begin // ... Result := Format(Pattern, [Parameter]); end; Or is it necessary to explicitly cast the parameters? Result := Format...
Before I spend what is sure to be many hours tracking down a problem, I wanted to find out if anyone else has successfully installed the same Intraweb service multiple times on the same server (running on different ports, of course!), and if you had to do something strange to get it going or if I might have done something strange to prev...
Hi, I have 2 forms. Form1 with one panel and 2 buttons (pnl1, btnShowTree and btnAddItems). There is also Form2 which contains Treeview (tv1). Please see short code below to understand this little demonstration: procedure TForm1.btnShowTreeClick(Sender: TObject); begin with Form2 do begin tv1.Items.clear; Tv1.Items.AddChi...
What I need to do is compare two strings and mark the differences with begining/ending marks for changes. Example: this is string number one. this string is string number two. output would be this [is|string is] string number [one|two]. I've been trying to figure this out for some time now. And I found something I blieved would h...
I'm trying to add register an exe file with a file extension. The code below works fine with XP, but throws an error in Win Vista/7. var reg: TRegistry; begin reg := TRegistry.Create; try reg.RootKey := HKEY_CLASSES_ROOT; reg.OpenKey('.' + ExtName, True); reg.WriteString('', ExtName + 'file'); //error: Failed to set ...
Hello. The situation is the following. Typically I use RAD Studio 2010 for Delphi development. I have some components I would like to redistribute in binary form (*.bpl without source). But I would like people to be able to use them despite of their Delphi version. But, for example, dcu files can be used only by compiler version, which...
I am trying to make a set of applications discover each other using UDP and broadcasting messages. The applications will periodically send out an UDP packet saying who they are and what they can do. Initially we only use to broadcast to INADDR_BROADCAST. All applications share the same port to listen to (hence the SO_REUSEADDR). An even...
Does anyone know of a project to do a Google Protocol Buffers implementation in Delphi? ...
Hi I can copy files remotely and connect to remote registry. But in OS like Vista and Windows 7 the remote registry service could be inactive. So I want to chech if the service is active if not then start it, so how can i start or stop the remote computer remote registry service using Delphi 2007 ? ...
Hi, While showing a save dialog, I want to hook user's filter type change and change file extension automatically. (e.g. like MSPaint's "Save As" operation.) With TSaveDialog and setting UseLatestCommonDialogs := False, I can handle this by the following code. (without latest common dialog support, of cource.) procedure TForm1.SaveD...
I am trying to send an e-mail using gmail account (Delphi 7, Indy 10) with these settings: TIdSmtp: Port = 587; UseTLS := utUseExplicitTLS; TIdSSLIOHandlerSocketOpenSSL: SSLOptions.Method := sslvTLSv1; Everything seems to be set ok. I get this response: Resolving hostname smtp.gmail.com. Connecting to 74.125.77.109. SSL status: "...
Hi! I am looking for xmpp / jabber protocol implementation for Delphi 7. IP*WORKS! is one of solutions, but it is expensive. I saw Any complete library for Jabber in Delphi? question and JOPL was the answer, but it is not for Delphi 7. What do you use for Jabber and Delphi 7? ...
Hi. I need to send Email from my Delphi application. What I need is a WYSIWYG editor that I can use in the application to create the body of the email in HTML. Any ideas? Thanks, Pieter. ...
I'm often getting this exception "EDBClient: Mismatch in datapacket" when I call ApplyUpdates on a particular ClientDataSet. I can't reproduce on my machine and I think it started after upgrading to Delphi 2010, because this code is untouched for a long time. An additional information is that I don't use midas.dll, I compile MidasLib u...
I've written a custom SDL GUI toolkit (source is on http://sourceforge.net/projects/lkgui/files/) and I'm having an issue with an inherited object. When the object is within the main program, the constructor isn't called hence the program doesn't properly initialise the object and it crashes after some commands (Specifically, TStartGame...
I just noticed that some of my new Delphi controls get installed in the Public Documents folder in windows 7 (TMS Smooth controls and Virtual Treeview). Is there a reason for this, is this a convention or a few way of doing things or something that the operating system does. Is there a place where I can set the root of my Source con...
I've been trying to list the appointments for a given date (say today) on a tmemo by using OLE under delphi. It's been unsuccessful so far. The basic code starts with try Outlook := GetActiveOleObject('outlook.application'); except Outlook := CreateOleObject('outlook.application'); end; Namespace := Outlook.GetNamespac...