delphi

"form already exists" after form is closed and another instance opened. Delphi

I keep running into this strange problem. It almost seems to be random but I run my application and open a form, do some work with it and close it. The next time I go to open another isntance of that form I get an error message about the form already existing. This is very odd and I haven't been able to constantly reproduce the error....

How do I copy a form as an image to the clipboard

I need to copy a form (Delphi 2007) to the clipboard as an image to paste what the user can see into a word document. The clipboard part is not really a problem. The questions is how to get a bitmap for the form. Searching has turned up multiple options. Call GetFormImage Use the PrintWindow API function that is part of the GDI+ ...

How to write a memory manager that maps 4 giggs for Delphi

I have an object that uses more than 2 gigs if virtual memory But Delphi only managers 2 Gigs I'm considering ether making a number of objects and grouping them and using the windows wow64 method some how and use 64 bit windows. Or just upgrading memory manger to 4 gigs and build it around Int64. effectively I need TStream as the base ob...

Converting QuickReport To FastReport

I am Converting a QuickReport to a FastReport in Delphi source, I want to detrmine the event method name that assigned to a QuickReport object and according to it assign a method to the same event of the FastReport object. How can I do it? ...

Delphi - Use an existing automation object in a new application

Hello, I've got an existing application which has an an automation object. I have to rewrite this application, and I would like to use the existing automation object in the new application. Is this possible somehowm, or do I have to create a new automation object in the new application and copy-paste the functions from the old one? Th...

Why use string[1] rather than string while using readbuffer

Hi, I am having a record like this TEmf_SrectchDIBits = packed record rEMF_STRETCHDI_BITS: TEMRStretchDIBits; rBitmapInfo: TBitmapInfo; ImageSource: string; end; --- --- RecordData: TEmf_SrectchDIBits; If i am reading data into it by using TStream like this an exception is occuring SetLength(RecordData.ImageSo...

How to set "Align left" to have predominance over "Align Top" in Delphi 7?

I want to align a certain component to Align=alLeft on the panel, occupying the whole left side of the panel. Then also have another component set to Align=AlTop, but not having predominance over the component aligned to the left, so that it will only occupy the top of the panel where the component that is aligned left is not occupying. ...

Maven-like tool for Delphi (or C#)

Does anyone know whether there are any tools that re like Maven - I'm looking for something to manage project dependencies ? Any suggestions would be greatly appreciated. ...

How do I get the address of a field if it's a procedure or function pointer?

I have to do some record sub-data size calculation so created something like function GetSubDataSize(const Rec: TRecord): integer; begin Result:=integer(@Rec.Field2) - integer(@Rec.Field1); end; Everything is ok except for one case, if one of Field is a procedure or function pointer, so in case of TRecord = record Field2: proce...

Do I need to free these objects?

I'm using Delphi 1 16-bit to learn Pascal (don't laugh, it works fine, plus I can't afford a more recent version). I'm using a TList to hold object references for a simple address book. Each object is added to the TList like so: DataList.Add(TAddrBookData.Create('Bob', '1 Mill St')); Do I need to free the TAddrBookData objects myself?...

Set Delphi 7 project "Version Info" from code?

Is it possible to set the "Version Info" settings from code? I'd like to set the version numbering and the value for the "Comments" property without using the project options dialog. ...

Delphi 2010 Leave My Comments Alone

The code formatter in Delphi 2010 is a useful tool for developing coding standards, or at least this is my opinion, however it has a horrid habit of ruining comments. A nicly commented block like this.. SomeFunction(SomeVaribleWithALongName, // Comment Option2, // Comment ...

Does TReader/TWriter support unicode?

I'm currently spending some time converting my network unit to support unicode strings and things are going good so far (at least I think so). Unfortunately I'm working on Delphi 7 so I can't test the unicode support in action and I don't have documentation of the newer Delphi versions. I have used a few TReader and TWriter objects in m...

What Can I Do To Reduce My Executable's Size (Delphi)?

I release a single executable (.EXE) for a desktop program using Delphi 2009. I have no external DLLs or resources that I need for the program to run. I use two components: LMD Innovative's ELPack and Sergey Tkachenko's TRichView that are compiled into my executable. When I build my production version, using the "Release" build configu...

Can I use zipimport to ship a embedded python?

Currently I deploy a full python distribution (the original python 2.7 msi) with my app. Is a embebed web server, made with delphi. Reading http://www.python-forum.org/pythonforum/viewtopic.php?f=1&t=18623 I wonder if is possible to use this for embed the necessary python files with my app, to decrease load files and avoid conflict...

communicating with mirc client using delphi

hi all is there component which can allow me to communicate with mirc to connect to a specified server and then join to specified channel ? thanks in advance regards ...

Delphi: Assigning to global record - global record doesn't change

In a delphi unit, I have a global record called 'Context': interface type TContext = record ... end; var context: TContext; I also have a initialization procedure in this unit, taking a context: interface procedure Init(AContext: TContext); Inside the Init procedure, I try to assign the given context to ...

How to mix std::stream and Delphi TStream?

I'm using C++Builder, and am trying to slowly migrate code to using C++ standard library in preference to the Delphi VCL. The VCL has a streaming architecture based around the TStream class, and I'm switching to using std::stream instead. However, in the short term, I still need a way of 'mixing' use of the two stream types. I can do ...

Delphi - Problem using an existing dll

Hi, I have to use an existing dll, but got a problem with it. Here's how I try to use it: unit u_main; ... implementation procedure getUserData(var User, Pass: string); stdcall; external 'Common5.dll'; {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var u, p: string; begin getUserData(u,p); end; ... end. When I pr...

Using an ImageMap extracting Images (PNG) and display on TImage

Hi, I'm trying to achieve the following: Assume a large png (transparent background 16000 x 70px) which contains 50 different other png files... I need to load that png and extract individual pngs from it (best would be e.g. to have kind of a function which I could say by coords (left, top, height, width) which png I would like to extra...