Is it not possible to use the Pause/Break key in keyboard shortcuts? I know I can respond to the Pause/Break key, e.g. procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_PAUSE then ShowMessage('VK_PAUSE pressed'); end; However, I am unable to respond to the Pause/Break key usin...
Possible Duplicate: how to disable javascript errors on twebbrowser ? I'm using the TWebBrowser component with Delphi 6.0 to display a YouTube web page. Sometimes I get a Script error message box from Internet Explorer, which TWebBrowser embeds, complaining that an error has occurred in a script running on the page and prompt...
I have text being passed to a function. That text can contain anything, from a single character all the way to a full book. I need to extract the first like and use it as a "title" so I can name a file where I am saving that text as a backup. I am using the following: function GetTitle(var Text:string):string; var title: string; p...
Hi all, How can I see the source code of an executable compiled by Delphi or C++? Please help me. After Edit: I have a program. When I start this program, it shows a dialog and asks for a password. This password is saved in source code. I want to take this password quickly and easily. ...
I'm having an issue with temp tables using an ADO connection to my database. The select into queries run fine, but it seems that they are dropping the tables after each select into. Their is no open recordset so I am unsure as to why the tables are dropping, it shouldn't be opening a 2nd ADO connection that I can see. Any idea what I ca...
In an Delphi MDI application i can use the Tile,Cascade and ArrangeIcons procedures to organize my child windows, this methods only works when the FormStyle property is set to fsMDIForm, How i can produce the same effect in an SDI application, i mean how i can organize my open windows in a non MDI application? ...
As I have been reading up I need to get to some foundation to build safely on When .net takes up a *.dll from within windows it no longer becomes available to .com. 1/ Does this rule mean I loose loadlibray() and GetProcAddress() to load a .net dll like mscorlib.dll. one developer says no, So I'm asking what boundaries do I have. Has d...
I'm using Delphi 7. When I try to create an object in FormCreate, it fails (actually it just hangs). When I try to do the same thing in FormShow, it works. Please note, I'm not talking about creating a visual component like a TEdit. It's a database abstraction object. Any ideas why this might happen? Are there any guidelines about this t...
I have a couple of other forms floating around the MainForm for I := 1 to UserCount then tempform:= TCustomFrm.Create(self); and I want them to be dependent on the MainForm, meaning when I minimize the MainForm they're also minimized, and then I maximize the MainForm the other forms are also maximized. I also want them to be p...
I have a requirement to build an Image manager which will allow users to build a collection of photos/images and then give them an option to convert these photos to a single EXE which when run, will show the photos/images on target PC as a slide show in full screen. Is it possible to do this for multiple images? ...
Hi , in visual basic i can open a binary(exe) file with below way : Strx$ = Space(FileLen(FileName)) Open FileName For Binary As #1 Get #1, , Strx$ Close in this way i can read all of binary file characters and read file content like this format : and the question is how can i open a binary(exe) file in delphi with a string format...
WHAT I AM TRYING TO DO I am trying to draw multiple graphics to a Timage, These graphics that i Draw consist of ordered layers with Foodfills and lines. I use multiple buffers to ensure ordering and double buffering. WHAT I AM DOING procedure DrawScene(); var ObjLength,LineLength,Filllength,Obj,lin,angle,i:integer; Npoints : a...
I have created an TCPip server application. The application has one global TADOConnection. This global ado connection is used both for main thread queries and also within threaded processes. Is this ok? Does the ADOConnection have built in mechanisms to handle multiple queries at the same time? My application works find in testing...
hi all i am trying to store some settings in resource of my application but failed i dont want to use ini file or registry methods i am using this code var data :string; procedure WriteSettings(ServerFile: string; Settings: string); var ResourceHandle: THandle; pwServerFile: PWideChar; begin GetMem...
Hi. I have a TStatusBar that contains two status panels. The first one is about 100 pixels long. The second one fills the rest of the status bar width. If I try to display in this second panel strings longer than about 140 chars, it truncates them to this value. There is any way to get over this bug? D7, Win XP Edit: is 126 chars. ...
Hi, I got a very serious problem when I'm trying to access TDictionary variable in host program from a dynamicly loaded dll. Here is the complete code, anyone can give some help? thanks! ===========main program project source code=================== program main; uses ShareMem, Forms, uMain in 'uMain.pas' {Form1}, uCommon in...
Possible Duplicates: Getting Machines MAC Address Good Solution? How do I get the MAC address of a network card using Delphi? I am using MAC address as hardware id for protection(ofcourse I have encrypted this data) I am using below code to get MAC address on user computer function MacAddress: string; var Lib: Cardinal; F...
Hi,I'm using below code to file copy operataion in windows seven,but it doesn't work and there is no any error while running or debugging,When the application goes to calling the CoGetObject it'll crash and can't returning any Hresult error,I just know the error occur in this line ->result := CoGetObject(pWideString(MonikerName), @BindOp...
I'm slightly confused and hoping for enlightenment. I'm using Delphi 2010 for this project and I'm trying to compare 2 strings. Using the code below fails if AnsiStrIComp(PAnsiChar(sCatName), PAnsiChar(CatNode.CatName)) = 0 then... because according to the debugger only the first character of each string is being compared. I.E. if s...
i am trying to send a picture from 'C:\picture.bmp' to 'c:\temp\picture.bmp' using server and client socket clients onconnect event handler is as follow: procedure TForm2.ClientSocket1Connect(Sender: TObject; Socket: TCustomWinSocket); var fs : tfilestream; begin fs := TFileStream.create('C:\picture.bmp', fmOpenRead);//pictu...