Hi,
I'm attempting to run some code in Delphi Professional Editon (ver 5.0). I believe the code was written in Delphi Enterprise Edition. I receive the following error message:
Project LARS.exe raised exception class EDBEngineError with message 'Your application is not enabled for use...
Hi Gang,
Anyone know how I change this code to allow the use of the backspace key?
Thanks.
if not (Key in [Ɔ'..' 9']) then //Allow numeric characters only
Key := #0;
Hi,
I have a form with several edit boxes on it. The first box will always appear with text in it. The rest will be used for input. Is there a simple way to detect whether or not someone has entered text into an edit box and moreover, which edit box?
Thanks.
Glenn
Hi,
I have an array in a file
c_table: packed Array[0..7] of TCASHIER_TABLE;
Does anyone know how I can initialize this to zeros or nulls?
Thanks.
Glenn.
Hi,
I have a form with multiple edit boxes. The boxes are set to TabStop is False. For some reason when I run the program, my cursor still stops at these edit boxes. I configured an other form in the same manner and my cursor doesn't stop at the edit boxes.
Anyone know how I can stop tab stops...
Hi,
I have 28 edit boxes on a form. I want to clear the Text property of all of them (eg. EditBox1.Text :=''). Is there a way to do this globally without having to reference each individual box?
Thanks.
Hi,
I'm using this bit of code to read some information stored in a two dimensional array of Single at the line indicated. No luck so far. The information is at 0,1 in the array but I'm not sure how to get it.
Any thoughts would be apprecicated.
Thanks.
procedure...
Hi,
I want to have the ENTER key act as a RETURN key inside a Memo box so that users may enter multiple lines of text.
Currently, if the user presses the ENTER key the form closes which I don't want to have happen. I have set the default property on the OK button on the form to FALSE.
Thanks
Hi Guys,
I'm using the following code to read some info from a file, which I access via a structure, into a Memo Box and then write new info from the Memo Box back to the file. The read portion under Form Activate works OK but when I attempt to write using the 'EdtLgOkBtnClick' procedure I get...
Hi,
I have two forms using this code:
begin
if NewTermIdEdt.Text = '' then
begin
ShowMessage('Please Enter Information');
Exit;
end
However, the two recact differently when the user clicks on the 'OK' button after the ShowMessage procedure. On one the form remains visible. On the other...
Hi Guys,
I'm using the following code to read some info from a file into a Memo Box and then write new info from the Memo Box back to the file. The read portion under Form Activate works OK but when I attempt to write using the 'EdtLgOkBtnClick' procedure I get an, "Access Violation"...
Hi,
Quick question. I'm want to know if a memo box is empty (i.e. equals a null value) I tried using:
if EdtLgMb.Lines = '' then
but I get a error telling me that Strings and TStrings are incompatible.
How do I get around this?
Thanks.
Hi,
Does anyone know how to convert Singles to Strings and vice versa?
I'm looking for something like StrToInt or IntToStr type functions for the following code as I'm getting an error on the last line.
Thanks.
procedure TUSXchgFrm.FormActivate(Sender: TObject);
var
RecINFO...
Hi,
I'm using following code to write items to a file using the write_options function. This function only has one parameter and writes the contains of the entire file. Before calling it I'm changing one value in the file (NewID). NOTE: RecINFO is the name of a record and max_discount is an...
Hi,
I'm trying to get data from a record (structure) and copy it to a memo box component. I keep getting compatibility errors.
Here's the code:
procedure TEdtLgFrm.FormActivate(Sender: TObject);
var
RecINFO : INFO; //INFO is a Record
begin
read_options(@RecINFO)...
Hi,
I'm using the attached Delphi Record to get data from a DLL written in 'C'. For some reason I get incorrect values returned (eg. I get a value of 49 when I'm expecting a value of 999).
Has anyone had any experience with this?
Thanks very much.
unit optsrecord;
interface
type
ITEM =...
Hi,
I'm using the SizeOf Function to obtain the size of a record. I appear to get confusing results. Specifically, when I comment out a 'Char' the value of my Record drops by 4. I thought a 'Char' was only 1(??). If I comment out a 'Word' the value also drops by 4, which I would expect...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.