delphi

How do I remotely obtain a system's network shares and connections?

I'm looking for a way to obtain information similar to the following console applications, remotely: net use net share netstat -ano However, I need to be able to do this without running a 3rd party application on the system. This effectively rules out using psexec to execute the command remotely, because psexec would then be installe...

Delphi 2009 - how can install the system library units - SysUtils.pas & so on?

I've installed RAD Studio 2009 for Delphi & I want to be able to step in the system library units, such as SysUtils.pas & alike, but it seems that they where not installed with the IDE. Is there any installation option to do this? Appreciate any help with this issue. ...

Do I have to allocate and free records when using TList<T> in Delphi?

The question more or less says it all. Given the following record structure: type TPerson = record Name: string; Age: Integer; end; PPerson = ^TPerson; TPersonList = TList<TPerson>; Is the following code valid? procedure ReadPeople(DataSet: TDataSet; PersonList: TPersonList); begin PersonList.Coun...

Variants recursively uses itself?

I'm trying to build a debug version of rtl140.bpl to make debugging apps with runtime packages easier. I built the DPK and ran DCC32 on it, and it gets a ways in, then dies. C:\Program Files (x86)\Embarcadero\RAD Studio\7.0\source\Win32\rtl\sys\Variants.pas(1072) Fatal: F2092 Program or unit 'Variants' recursively uses itself But look...

How to check if TypeIdenitifier(T) is an Object?

I'm creating a generic list class that has a member of type Array(Array of ). The problem is the class destruction,because the class is supposed to be used for types from byte to types inheriting TObject. Specifically: destructor Destroy; var elem:T; begin /*if(T is Tobject) then //Check if T inherits TObject {Compiler error!} f...

Mysql latin1 turkish data and delphi 2010 utf8

Hello, I have tables collating latin1_general_ci and have turkish character values. And i can use this data on delphi 7+zeos with no problem. but i want to upgrade my delphi to 2010 version but zeos too slow as i saw. so i want to use odbc+ado or dbexpress solution. dbexpress solution works fine , display my data as entered and write ...

How make a control that look like the "download" dialog of firefox

I have a application that like firefox, can be enhanced from plugins available from internet. Now, I want to provide in Delphi (2010) a dialog similar to the download from firefox. I have no skills in build graphical controls. Using the standard controls of Delphi, what could be the best way... using a TListView/TStringGrid with custom...

Usage of the Active Report In the Delphi6

Hi All Can I use the Active Report with the Delphi6? ...

What is the best way to play video file in Delphi ?

I need to play video file (using installed codecs) and get some file info (such as frame rate and length). ...

How to call function CreateProcess in Delphi Prism?

I wrote function CreateProcess( lpApplicationName:String; lpCommandLine:String; lpProcessAttributes:IntPtr; lpThreadAttributes:IntPtr; bInheritHandles:Boolean; dwCreationFlags:Int32; lpEnvironment:IntPtr; lpCurrentDirectory:IntPtr; ...

Why is Delphi unable to infer the type for a parameter TEnumerable<T>?

Consider the following declaration of a generic utility class in Delphi 2010: TEnumerableUtils = class public class function InferenceTest<T>(Param: T): T; class function Count<T>(Enumerable: TEnumerable<T>): Integer; overload; class function Count<T>(Enumerable: TEnumerable<T>; Filter: TPredicate<T>): Integer; overload; end; So...

How can pass parameters to a flash Movie in Delphi 2010?

I have imported the ShockWave flash Activex Control in my Delphi project. I can manipulate All the properties of a Flash movie file. But I need to define my own Parameters in the my own Flash file and Manipulate those parameters in the Delphi project. I know that passing parameters to a flash file is possible in the HTML script. But my p...

Programming Windows Cluster resource DLLs using Delphi

I wonder whether there's a way to program a resource DLL for Windows Clusters in Delphi. I want to write a program that observes cluster state changes. Judging from the MSDN API reference, all relevant functions are located in the ClusAPI.h and ResAPI.h headers, but unfortunately it seems as if they haven't been ported yet and HeaderCon...

Delphi: All constants are constant, but some are more constant than others?

Consider: const clHotlight: TColor = $00FF9933; clLink = clHotLight; //alias of clHotlight [Error] file.pas: Constant expression expected and the alternate wording that works: const clHotlight = TColor($00FF9933); clLink = clHotLight; //alias of clHotlight Explain. Then consider: const AdministratorGUID: TGUI...

Transparent checkbox with theme-support?

I'm looking for a simple, transparent checkbox component that properly supports XP/Vista/7 theming. It should also work with Delphi 7. I've found a component on Torry's that's not working properly, and I know that Raize components has a transparent checkbox - but I'm obviously not going to pay $300 for the entire package just to get th...

What does "the application failed to initialize properly" mean?

I just got a bug report from someone running an app I wrote under Windows XP. He says it won't start up. The application failed to initialize properly (0xc0150002). Click on OK to terminate the application. It works fine at my end, (under Windows 7,) and I don't have any Win7- or Vista-specific stuff in the program, so it shou...

Self-extracting Delphi program

I'm writing an updater program in Delphi7 which will be run once, but needs many files to run. What I'd like the achieve: User runs exe Exe unpacks files, runs updater If updater detects and error, prompts the user to send log in e-mail After the updater is run, temporary files are deleted (some of these files are dlls used by the upd...

Avoiding "variable might not have been initialized"

I recently ran across a routine that looks something like this: procedure TMyForm.DoSomething(list: TList<TMyObject>; const flag: boolean); var local: integer; begin if flag then //do something else local := ExpensiveFunctionCallThatCalculatesSomething; //do something else for i := 0 to list.Count do if flag then ...

Sample Application - Amazon S3 / Indy / Delphi

I am looking for an example application to store objects to Amazon S3 using INDY components. Any help much appreciated. Phillip ...

Pegasus Imaging PrintPro ActiveX control gives error when dropped on Delphi form

I'm trying to use the Pegasus Imaging PrintPro v4 ActiveX control with Delphi 7 on a Win2K box. When I drop the ActiveX control on the form I get the extremely helpful error message "Access violation at address 00000000. Read of address 00000000." and the component doesn't appear on the form. There are a bunch of other Pegasus Imaging...