JohnLM

@Lainkes - this is probably what you are after. Put the if/then code snippet (below) into the OnColEnter event of the DBGrid. And every time you enter that field that you set .FieldName='myfieldname' to, will highlight your button bold or non-bold. procedure TForm1.dbgrid1ColEnter(Sender: TObject); begin if db1.SelectedField.FieldName='myfieldname' then button1.Font.Style := [fsBold] else button1.Font.Style := []; end;

Resolved - regarding the .dcu files. Under the: options -> Environment Options -> Delphi Options -> Library -> Library Path: I added the "\WebView4Delphi-main\source\" folder After this update, the SimpleBrowser compiled and ran.

Your suggestion to change the 'Package output directory' worked. The components have been added successfully. Thanks. However, when I try to compile a few of your demos, they fail. It seems none of the .dcu files are being created and Delphi can't find them at compile time. below are from your SimpleBroswer demo. They are in the Uses section with red underlines. uWVBrowser, uWVWinControl, uWVWindowParent, uWVTypes, uWVConstants, uWVTypeLibrary, uWVLibFunctions, uWVLoader, uWVInterfaces, uWVCoreWebView2Args, uWVBrowserBase

Unfortunately, I am still getting the same error message stated in my first post above. I've also downloaded the latest version, which are dated 3/9/2024. Please note, each file that I Build, I am first double-clicking on it to select it. WebView4DelphiVCLRTL.bpl, when I right-click it, I select Build, when it finishes, I get Done. WebView4DelphiFMXRTL.bpl, when I right-click it, I select Build, when it finishes, I get Warnings. WebView4DelphiVCL_designtime.bpl when I right-click it, I select Build, when it finishes, I get Done. ** this is the file that will not complete when I right-click and select Install. I get the error message stated earlier. ** WebView4DelphiFMX_designtime.bpl when I right-click, I select Build, when it finishes, I get Warnings. ** this file also will not complete when I right-click and select Install. I get the error message stated earlier. **

Hi, I'm having trouble installing webview4delphi under Delphi XE7. I am receiving the following error: "The program can't start because WebView4DelphiVCLRTL.bpl is missing from your computer. Try reinstalling the program to fix this problem." But the file is showing in the listing below:

Oops, posted in the wrong topic. Will post in correct one shortly.

I was replying to @Clément.

okay, how about setting DoubBuffered:=true ? That is used to stop flicker in most controls and I've used this feature for many years, since Delphi 6. The following may work: form1.doublebuffered := true; toolbar1.doublebuffered := true; titlebarpanel1.doublebuffered := true; You can add that in the form's Create of Activate event. This should work.

1. add a timage to the form. 2. load the a picture via Object Inspector window (or load via code) 3. use the following code snippet in a button event or other area of your source code. note: if the image is large and you shrink it, it may animate with image distortions. form1.DoubleBuffered := true; (image1.picture.graphic as TGifImage).Animate := true; (image1.picture.graphic as TFifImage).AnimationSpeed := 150;

I was searching around bestbuy for a streaming device that I could hook up my phone to the device and connect it to my laptop. And after searching around I saw that there are other ways to stream using OBS software on the laptop and installing an app on the phone via an ipp address. Is there a way to do this with Delphi so I don't have to worry about installing someone's app and being on *their* server? I would rather do it the Delphi way if possible, TIA.

My main laptop hdd crashed, will not boot into win7, only in basic safe mode. The one i mentioned is the same exact model, and i restored an old backup to it from few yrs ago. But it does not have the wifi chip in it and i dont want to mess with it at this time.

I want to watch some youtube videos, but from my phone, streamed to my laptop, and maybe to my win10 tablet.

I have the Galaxy s10+ I went to best buy and one guy said if my phone and laptop has mirror, then i can. I have a dell inspiron 5520 laptop, from 2010 or 2012 i believe, win 7 prem.

I am just starting to use the TValueListEditor and found out that there is no wordwrap feature. I have text that are longer than I can see and there is no scroll feature. Actually, there is, but it does not do what I expect it to do as a scroll (left/right), but even so, it would be too cumbersome to utilize. I would much prefer to have the text wordwrapped. Is there a way I can easily add a custom wordwrap to it?

Here is another method: procedure TForm1.Button2Click(Sender: TObject); var nameStr: string; begin if inputquery('Name:', 'Enter Name:', nameStr) then edit.Text:=nameStr; end;

Yes, it's the InputBox() function. See: InputBox (Delphi) - RAD Studio Code Examples (embarcadero.com) (add the vcl.dialogs in the uses section if it is not already there.) Sample usage: procedure TForm1.Button3Click(Sender: TObject); var InputString: string; begin InputString:=InputBox( 'Input Box', 'Prompt', ''); if InputString<>'' then edit1.Text:=InputString; end;

Are people backing up or imaging their system before doing these patch updates or re-installs? I mean, that should be Priority No 1 so that in the event something does go wrong then a simple restore of the backup/image will have you continuing on as if nothing happened until things do get fixed. I am using Macrium Reflect v8.0.7783, the FREE version. Note: the later versions are not free.

Due to finance, I will have to wait to install the patch 1 for 12 since I cannot renew subscription at this time. But I don't seem to have any trouble with 11.2 and 12.0 since I installed both on my current tablet since Nov/2023.

The purpose of using this API is for pulling just the "artist release date". I am not using the REST that comes with Delphi yet, but I probably should and will eventually. I just need the artist release date for now. And I can pull that info from the JSON. https://www.discogs.com/developers/#page:database,header:database-search-get But. . . I'm having trouble trying to test the demo. I have the two keys they sent, but the guide(s) I am reading do not include the whole API string, and its confusing. I've never had this much difficulty with API's. I need to format the "fetch" part (below) into a full one-line string that I can paste into the URL box in a webbrowser. fetch('https://api.discogs.com/releases/1', { headers: { 'Authorization': 'Discogs key=[YOUR_KEY],secret=[YOUR_SECRET]' } }) .then(response => response.json()) .then(data => console.log(data)) .catch(error => console.error(error));

Update. . . Initially, I was trying to set up a TWebbrowser on a form (and a button/edit controls) but I was getting script errors. Well, not from javascript, but two pop-up download for the JSON file. If I select Open, it will open in notepad. But this was too cumbersome. But I finally did get it to work in a basic web browser window made in delph using the TEdgeBrowser component, using D12.0, and the API worked and displayed. Next, I will figure out how to build a crude JSON parser to just snip the {"Country" : "US", "Year" : value} for now. Note: I had to delete the app name/key because I posted that in the last image by mistake. I created a new app name/key.

Okay. I finally figured it out and its working.

As I mentioned in my previous response, the code snippet I provided is buggy and will not work for every case, and definitely not for a larger list of items, so I do not recommend it. As for a solution, I don't have the TMS component you mentioned, so I don't know what it can/cannot filter as you stated. For your request, it will require a more custom algorithm for that type of filter search to make it work the way you want. And for that, you will have to figure that part out or search google for one if one exists.

I played around with this myself and came up with the following that works for me: procedure TForm1.Edit1Change(Sender: TObject); Var i: Integer; Begin if trim(Edit1.text)='' then listbox1.items.Assign(list_global) else begin for i := 0 to list_global.Count - 1 do if pos(Edit1.text, list_global[i]) > 0 then begin listbox1.Clear; listBox1.Items.Add(list_global[i]); end; end; End; If any items in the listbox starting with the first char of those items, those item(s) will show in the listbox. Sometimes other items will show if having the same char. And, other times will not. In other words, its a little buggy.

Then we would go back to the days of BBS on dialup 🙂

I use ms powerpoint to hold and store all my screenshots of various things throughout the day using my main laptop. I especially do this for items I purchase on Amazon and Ebay. However, on my tablet I cannot do this since I don't have MS Office on it. So now, I would like to create a rolling image bar that holds/shows all my screenshots made on the tablet and then save them all in one file, like a project. I want to do something very similar to what powerpoint does, but nothing fancy. Just a vertical toolbar that holds/shows all images I made. Is there a component that can help me halfway through this project idea, or can I build something close to what I want to do with the tools/components already built into D11/D12 ? In my vision of such a tool, I have the following: 1. a panel/toolbar 2. an timage 3. button to capture the screenshot(s) 4. add/create a new timage in the toolbar every time I take a screenshot (get from cliboard, etc) 5. scroll up/down inside the toolbar of images that I took thus far 6. a main timage that shows the screenshot I take 7. and if I click on any of the images in the toolbar, that image will show on the main timage 8. save and load buttons All this in the above steps are basically what I do in ms powerpoint.