if the components didn't install correctly, then I suggest removing them. You can adapt the instructions here: https://stackoverflow.com/a/32758027 to remove the JCL and JEDI packages and then attempt to reinstall them.
I don't think you need to set any environment variable for GetIt to...
To set up a DBGrid, you need to have a connection component to the database. Once that's set up, you need a TQuery or TTable component, that attaches to the connector, then you need a TDatasource that points to the TTable or TQuery. The final step is to have the DBGrid attached to the...
Are you using the JEDI included in the GetIt package manager? Menu item "Tools| GetIt Package Manager." You must first install "JEDI Code Library" before you can install "JEDI Visual Component Library." That should install the packages completely.
One last think, as the install starts, it...
If you want to capture any key pressed on any of the controls on a form, then you have to set the form's keypreview property to True.
https://docwiki.embarcadero.com/Libraries/Sydney/en/Vcl.Forms.TCustomForm.KeyPreview
Have you checked this link. It explains how to use SQLite on Mobile apps (and desktops).
Towards the bottom of the article you'll find "Setting Up Your Database Deployment for mobile",
Your trigger is an On Update Trigger, so your trigger has access to 2 possible values for cah_avail (and every other value for each of the columns), the OLD one and the NEW one (even if you didn't change it and they remain the same value). You have to preface the column name with either...
This is exactly how the for loop is expected to operate. From the documentation:
The for statement assigns the value of initialValue to counter, then executes statement repeatedly, incrementing or decrementing counter after each iteration. (The for...to syntax increments counter, while the...
It's not Replace.Text it is ReplaceText (without the period), but if it's not available in Delphi 6, then try this instead
SL.Text := stringreplace(Value, ' ', '#13#10', [rfReplaceAll]);
try something like this:
function GetInitials(const Value: String): String;
var
SL: TStringList;
I: Integer;
begin
//Doesn't guard against having more than one consecutive space or nothing but spaces in Value...
Result := '';
SL := TStringList.Create;
try
Result := ''...
What shortcut are you activating when you are typing? Shortcuts should involve holding the Alt or Ctrl keys with or without Shift or one of the F keys F1, F2 etc. or maybe the esc key, which should not happen under normal conditions when you are typing.
The event is now associated with the entire form, so if the enter key is clicked while that form has focus, it will kick off the event handler. If you want it to happen no matter which form has focus, that is a bit trickier.
more than likely you didn't catch my comment when I provided this code,
if you want it to send the message ANY TIME the enter key is pressed, then you don't want to use Edit1's OnKeypress, you would use the FORM's OnKeyPress but then you would need to set the FORM's KeyPreview to True...
If it returns a value, then technically, it's a stored function, thus you can use the function in the select or where portion of an SQL statement.
i.e.
select A, B, MyStoredProc(param1, paramn)
from tablename
where A = 'some value';
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.