JIMSMITH

Given the JSON object below. I want to update the value of a JSON Pair. Here are a few questions - 1) Is there a fast way to find the JSON details for fiddler@office365.com. Do I have to loop through the each of the 4 entries. and check the value. 2) I want to update the new_token value from "rice" to "beans". 3) How do I add a new pair after "current_token". - This is last because I can probably figure #3 it out for myself. Help is much appreciaded in advance. { "SPWORKDATA": { "DB_PARAMS": { "DriverID":"Oracle", "Port":"9060", "Monitorby":"", "MetaDefSchema":"False" }, "MAILCONFIGS": [ {"sole.heel@apple.com": { "clickid": "307663883943-8", "social": "weeklyreader", "account": "rick.flair@gmail.com", "new_token":"", "current_token":"1//0f1U7S6-TZ-_r6RtWc" } }, {"timmona@office365.com": { "clickid": "client_data2", "secret": "appsecret", "social": "timmon.ray@office365.com", "new_token":"scacral", "current_token":"refreshtoken" } }, {"bruce@office365.com": { "clickid": "client_data2", "secret": "appsecret", "social": "bruce.richards@office365.com", "new_token":"soapl", "current_token":"refreen" } }, {"fiddler@office365.com": { "clickid": "client_d89", "secret": "appsoul", "social": "karen.richards@office365.com", "new_token":"rice", "current_token":"old" } } ], "MEDIASERVER": { "Server": "192.162.2.185" }, "MSGSERVER": { "Server": "127.0.0.1", "Port":"55555" } }

Thanks for the information. An interesting read.

Apologies. There are supposed to be commas. I have added. Thanks. I made manual changes to for illustration purposes and make my 1st mistake.

I am using Delphi 10.1 update2. When processing a json file I cannot find the containskey method with a TJSONObject? Is there a work around to the the equivalent check JSONObject.containskey('keyvalue') for this version of Delphi?

I am tring to read a section of json containing an array below for the section titled MAILCONFIGS. There is an array that contains two pairs. I need to read the two JSON PAIRS and breakout the datapair within. Any help will be appreciated, and Thanks in advance. { "SPWORKDATA": { "DB_PARAMS": { "Pooled":"False", "DriverID":"Oracle", "Database":"iranums", "User_name":"rms", "Password":"trojan", "Server":"lilly.com", "Port":"5432", "Monitorby":"", "MetaDefSchema":"False" }, "MAILCONFIGS": [ {"mail1@gmail.com": { "client_id": "ClientID_Data1", "apptoken": "apptoken data1", "temptoken": "temporary token1" } }, {"mail2@gmail.com": { "client_id": "client_data2", "apptoken": "apptoken data2", "temptoken": "temporary token2" } } ], "MEDIASERVER": { "Server": "192.162.2.185" }, "MSGSERVER": { "Server": "127.0.0.1", "Port":"55555" } } }

Remy, I am using Delphi 10.1 Update 2. I was able to figure it out from the code that you provided plus prior work. So I am good at this point and thanks for your help.

I am using Delphi 10.1 Update 2.

I want to print to an Evolis Pebble printer using Delphi Berlin. Has anyone done this before? Is this possible since I see C++, C#, Swift, Python, and Swift examples? I have not seen any examples writing to this printer using Delphi. TIA

Has anybody here used the tzdb project to retrieve the gmt offset as in gmt -6 etc. as in gmt -X for America/Havana or any other example that you can think of? FYI tzdb is located at Code Examples · pavkam/tzdb Wiki · GitHub

For some reason I have to authorize my application through google to send email again. During the process I check the box indicates read, compuse, send email. I encounter an error indicated in the image below. The firewall has been turned off on this computer. Does anyone know how to resolve this error?

Here is the latest information. The referenced mail project does include a TidHTTPServer. The port was changed and it no longer worked. I have corrected this problem and it works. Truth is I did not know that Oauth 2.0 communication required all of these pieces. I wish there was a flow diagram. Thanks for all of your help education.

Remy , The product has a datamodule with a idhttpserver on it. I might have broken this part of the implementation. This is new ground for me with additional complications beyond my daily scope and skill set. I am digging into it to figure this oauth 2.0 process out. All assistance/input has been greatly appreciated. I need one of you sharp gents on retainer.

Do I find a http server on the web and install it? I will be checking for solutions in the meanwhile. The core of the app that I am testing is from Geoffrey Smith's GmailAuthsmtp demo. This entire oauth2 process is new to me and a little unclear. I think it has an http server component internally. Not sure if I broke it an it no longer works.

Not sure why I end up with local. The application is in dev/test mode. I get to a web page that says google has not verified this app. Thanks for your help Google uses localhost for OAuth2 authentication during development to simplify the process of testing and debugging. When you're developing an application, you can use localhost as the redirect URI to avoid the complexities of setting up a public server for testing purposes. This allows developers to run and test their applications locally without exposing their credentials and tokens to the internet.

Has anybody been able to send email from Delphi using oauth2. Every example that I have seen includes SMTP.UseTLS := utUseExplicitTLS; and SMTP.AuthType := satOAuth2; which appear undefined in my version 11 or 10.x? I am starting from scratch as Google tends to change access requirements to send email.

Thanks for responding to my post. Can you advise which example code should I place the creds and IdSMTP1 code into. FYI: The geoffsmith sample project prompts for user authentication. I can have that as this will execute as a back end process and not be visible to the ui. I just need to send an email

I have 5 frames that I want to create at runtime. The frames are descended from tframe2 or tframe3 how can I create this and allow the type (tframe2 or tframe3) to be specified in a variable.? So the object will be specified in a variable and the type will be in a variable as well. So tframe2 and tframe3 will be defined and created at runtime, but the actual frame and descendant from type would be in a variable.

Is it possible to load a timagelist with a .jpeg via TMemory stream?

I created a webmodule and assigned an action pathinfo of /getname*. The question is how do I create parameters for values say parameters ssn and dob would this become /getname/($ssn)/($dob)? Would really appreciate clarity.

I was never able to trigger the action with this implementation. I will try again. I don't think that I tried it properly.

I'm just glad to know that there is a legitimate format / usage of the option that you specified. I'm not quite sure how to specify the parameters in the url with the /getname/* option. The other option was /getname?name=jim&zip=91001 Don't know how to implement the other.

Okay. Thanks for your assistance.

Thanks for responding to my post. This actually worked by removing the additional characters / symbols. Do you know why there are many examples the use other options in the pathinfo property? Examples are: /getname/* {seen in some youtube videos} /getname/data/:id {thoughts are that id would be a parameter} Now I am curious.

Has anybody had experience installing the DelphiMVCFramework. The documentation references opening C:\dmvc\ideexpert\DMVC_IDE_Expert_D102Tokyo.dproj from the IDE. The problem that I have is that this does .dproj file does not exist. Trying to see if this will work for me or do I need to create my own mini rest server.

Thanks for the clarity. Now I know how the versioning education.