delphi-7 Questions
1
Solved
How to make my non-modal forms to always be on top of my main form?
I have tried:
procedure TForm3.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.WndParen...
7
Solved
We have many forms in our application, and I need a global event handler to detect when one of the forms is being destroyed (and then take some action).
p.s: I want to avoid adding code to each f...
3
Solved
I want to have a button with icon at the end of each row.
Like here:
I tried this
procedure TMyFrame.sgrd1DrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);...
Gintz asked 11/12, 2013 at 9:6
4
Solved
I m working with Delphi 7 and I want to find out the path of my .. /All Users/Documents directory.
I came across the following code
uses shlobj, ...
function GetMyDocuments: string;
var
r: Boo...
3
Solved
Do I need to call Coinitialize in the main/VCL thread in Delphi
before using ShellExecuteEx?
For a thread, yes but for the VCL thread ?
2
Solved
I have these 2 classes:
type
TMyBaseClass = class
protected
FAllowDoSomething: Boolean; // initialized to False
procedure DoSomething; virtual;
end;
TMyChildClass = class(TMyBaseClass)
pro...
1
Solved
in a thread,
is there a difference if I use
Coinitialize(nil)
instead of
CoInitializeEx(0, COINIT_MULTITHREADED);
I use Delphi 7 but I presume the question can remain for other programming ...
3
Solved
I have on a form some custom progress bars which are updated/refreshed twice per second and they are flickering.
TMyProgressBar = class(TCustomControl)
I inherited the control from TCustomContr...
2
Solved
I am using this code to detect the WindowsVersion on a PC.
function GetOS: string;
var
osVerInfo: TOSVersionInfo;
majorVer, minorVer: Integer;
begin
Result := 'Unknown';
osVerInfo.dwOSVersionIn...
9
Solved
I'm wondering how the few Delphi Programming users here are doing unit testing, if any? Is there anything that integrates with the Delphi IDE that you've found works well? If not, what tools ...
Linkman asked 20/8, 2008 at 16:12
1
Solved
5
Solved
Using Delphi 7, is there anyway to force inputbox to allow only numbers entry from 0 to 100 ?
Thanks!
4
Solved
I want to do something like this:
SQL.Text := Format('select foo from bar where baz like ''%s%''',[SearchTerm]);
But Format doesn't like that last '%', of course. So how can I escape it? \%? %%?...
1
Solved
I want to connect to an excel 2007 file(.xlsx) using delphi 7, so I used a AdoConnection and set its connectionstring property as:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\test\qm\Results-s...
Plasty asked 23/9, 2013 at 5:42
2
Solved
Is this even possible? Notepad++ for example does it, but simply trying to assign it to components like actions or menu items doesn't work. The event it is assigned to simply doesn't trigger.
So, ...
2
When using TIdHttp like this:
Memo1.Text := IdHTTP1.post(url,data);
I can get response content to memo1 if it doesn't give http error. But when it gives http bad request, Indy doesn't give me co...
4
im trying to send a message between 2 separate projects, but my problem is that im trying to make the receiver run inside a TThread Object, but WndProc wont work from inside an Object, must be a fu...
4
Solved
I wrote a TThread descendant class that, if an exception is raised, saves exception's Class and Message in two private fields
private
//...
FExceptionClass: ExceptClass; // --> Class of Exce...
1
Solved
I have a Label that is indicating a file size with
FormatFloat('##.## KB',BytesIn/OneKB);
and it all worked fine when the files were all under about 2MB. Now I am sometimes using files 2GB and ...
4
Solved
I wrote a Win32 application (in Delphi-7 which is 32-bit using TThread class) to create 100 threads. Each thread when resumed will continuously (in a loop) increment a 64 bit counter associated wit...
Trihydric asked 13/8, 2012 at 21:47
5
Solved
Hi
I want to retrieve HDD unique (hardware) serial number.
I use some functions but in Windows Seven or Vista they don't work correctly because of admin right.
Is it possible retrieve it without ru...
1
Solved
Objective:
Click on the button on the TRxDBCombo to call a search box
On Selecting the record from search box, the result is set as Field Value for the TComboEditBox and is posted in the TRxMemor...
1
Solved
With respect to a TEdit component, would it be possible for the component to handle a multi-line paste from the Windows Clipboard by converting line breaks to spaces?
In other words, if the follow...
Womanish asked 21/6, 2013 at 3:13
3
Solved
If you copy files under Windows 7, you will see the progress of the copy in a sort of progress bar begin displayed in the status or task bar button of the application.
Can this be achieved using D...
Elisa asked 28/4, 2011 at 6:53
3
Solved
I have this code right here to retrive the IP-address from a hostname:
program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils,
winsock;
function GetIPFromHost(const HostName: string): string;
typ...
Stieglitz asked 29/1, 2012 at 3:33
© 2022 - 2024 — McMap. All rights reserved.