Search results for query: *

Hi everyone Small correction here: cleared only RadioButtons placed on the same control (as far as i remember), i.e. if you place some RBs on a panel and some on the form then you'll have two "groups" of RBs. HTH --- McMerfy

Hi, As far as I remember INDY servers, you don't need to "manually" run OnExecute event on server side, it fired automatically every time a client sends something. So you only need to ReadLn periodically on client side and take a closer look at ReadLn method, it should have TimeOut param. HTH...

Hey there Don't have deplhi help nearby, but as far as i remember there is an array of cursors, something like Screen.Cursors. You can change Screen.Cursors[SQLCursor] (for more details take a look at the helps) to any cursor you need. HTH --- McMerfy

Hey ther I guess I didn't explain my idea full enough :) well going further: Windows surely will not allow to delete a program that is currently running, but prior to starting a second instance of you APP you can copy it to another file, say, you program's name is MyApp.exe, when it starts it...

Hey there Prior to finding a workaround try to process the messages first. button1.visible := false; Application.ProcessMessages; ..... button1.visible := true; HTH --- McMerfy

Hey hey If we are discuusing the ideas then here's one. Sorry I don't have time to write sample code at the moment, but the idea is quite simple. I was doing it when needed to make self updating application. Idea: Every time the application (APP1) is started, it starts another instance of...

Hey there. procedure ... // this is your routine that calls to Post method // of your Table begin ... try ADOTable1.Post; except ADOTable1.Cancel; end; ... end; procedure ADOTable1BeforePost(...); begin ... if (not <your condition>)then Abort(); ... end; HTH...

Yep, but in this case I don't need to know where the reg key is located ;) --- McMerfy

Hey there uses ShlObj; ... function GetDefaultSavePath(): String; var APath : pChar; begin GetMem(APath, MAX_PATH + 1); SHGetSpecialFolderPath(Application.Handle, APath, CSIDL_PERSONAL, False); SetString(Result, APath, lstrlen(APath)); Result := Trim(Result); FreeMem(APath)...

Hi FamWS As far as I see it, it's not the problem of OpenDialog, it's the way the file system works. What I mean is that you can not rename/delete a folder if you have opened a file from that folder. --- McMerfy

Hey there My version of what you need: SELECT * FROM USER WHERE (ID_USER = :IDUSER)OR(:ID_USER = -1) if you pass -1 as a query param then you'll get the whole table in your slect otherwise it will be zero or one record. HTH --- McMerfy

It's up to you. As you've correctly noticed both ways do the job. It's just a way of organizing your code, I always ad "()" to the declarations and calls to procedures and functions when they don't have paramenters so that when listing code I could see that it's a function and not a variable...

Heya Bobba If I got you right then all you need is to declare your function in interface section. unit ... interface ... function IsConnected(): Boolean; ... implementation ... function IsConnected(): Boolean; var flags: DWORD; begin Result := InternetGetConnectedState(@flags, 0); end...

Take a look at Steve's reply to your question in thread102-901308

Pikkunero's right. My mistake. Haven't woke up yet. --- McMerfy

Hi there As for packeges: take a look at your registry. Path: 'HKCU\Software\Borland\Delphi\5.0\Known Packages'; You can export this key to a file and then import it on your new laptop. Cheers. --- McMerfy

AStr := 'I can''''t do it' --- McMerfy

...DHI^.wParam, DHI^.lParam); end end; end; exports ADebugProc index 1 name 'ADebugProc'{, AMouseProc index 2 name 'AMouseProc'}; {$R *.RES} procedure LibraryProg(Reason: Integer); begin case Reason of DLL_PROCESS_ATTACH : CreateOrOpenMemShare(); DLL_PROCESS_DETACH ...

Can you modify the code of the game? Or is that only the launching program that you can modify? --- McMerfy

Absolutely correct ;) --- McMerfy