William23668
Members-
Content Count
135 -
Joined
-
Last visited
Everything posted by William23668
-
Full Stack looking for work
William23668 replied to William23668's topic in Job Opportunities / Coder for Hire
Total years of experience are 25+ williamnageib@gmail.com -
If I want to create a web app with Python and Delphi what would be the pipeline ?
William23668 replied to William23668's topic in Network, Cloud and Web
@David Schwartz Thanks I tried TMS Core but which is better unigui , TMS or IntraWeb ? -
If I want to create a web app with Python and Delphi what would be the pipeline ?
William23668 replied to William23668's topic in Network, Cloud and Web
In general. For example web app to manage company business has front end and backend dashboard -
Job Offer - 5 Delphi Devs for bit Time Professionals
William23668 replied to Daniele Teti's topic in Job Opportunities / Coder for Hire
Once a German company wanted to hire me but the employer want to keep the third amount of the salary with him for 5 years so he ensure that I dont leave him before 5 years. It is like slavery -
Hi, Is there any AI component that can be used with Delphi for autocomplete prediction ?
-
Unable to execute '"C:\Program Files\Java\jdk-17.0.1\bin\java.exe"
William23668 replied to William23668's topic in FMX
yes this was the problem. but I now get this error Solved I uninstalled the app from the phone and now it open Thanks -
Unable to execute '"C:\Program Files\Java\jdk-17.0.1\bin\java.exe"
William23668 replied to William23668's topic in FMX
[PAClient Error] Error: E7688 Unable to execute '"C:\Program Files\Eclipse Adoptium\jdk-11.0.15.10-hotspot\bin\java.exe" -cp "c:\program files (x86)\embarcadero\studio\22.0\bin\Android\r8-3.3.28.jar" com.android.tools.r8.D8 --release --min-api 23 --output "C:\Delphi\app1\Android64\Debug\app1.classes" @"C:\Delphi \app1\Android64\Debug\dex_list.txt"' (Error 1) -
Unable to execute '"C:\Program Files\Java\jdk-17.0.1\bin\java.exe"
William23668 replied to William23668's topic in FMX
Now I am getting this [PAClient Error] Error: E7688 Unable to execute '"C:\Program Files\Eclipse Adoptium\jdk-11.0.15.10-hotspot\bin\java.exe" will try restart -
Unable to execute '"C:\Program Files\Java\jdk-17.0.1\bin\java.exe"
William23668 replied to William23668's topic in FMX
[PAClient Error] Error: E7688 Unable to execute '"C:\Program Files\Java\jdk-17.0.1\bin\java.exe" -cp "c:\program files (x86)\embarcadero\studio\22.0\bin\Android\r8-3.3.28.jar" com.android.tools.r8.D8 --release --min-api 23 --output "C:\Delphi\app1\Android64\Debug\app1.classes" @"C:\Delphi Projects\app1\Android64\Debug\dex_list.txt"' (Error 1) I installed now MS openjdk but same error JAVA_HOME = C:\Program Files\Microsoft\jdk-17.0.6.10-hotspot\ -
Hi I have the option to show component caption on and in blank FMX project the component caption show normally but when I opened the contacts sample app I found the caption is hidden, how is that ?
-
Component caption does not appear in sample application
William23668 replied to William23668's topic in FMX
already on -
Hi Currently in the AddressBook sample app it display Arabic letters scrambled like ي ا ش ق So no possible way to display it correctly ?
-
Thanks thats a hidean site ! I installed Download (for build 46141) hope this is correct
-
Hi I was trying to add phone number in the address book demo like that hard coded but the number was never saved, why is that ? Contact.Phones.AddPhone('Home', '767867679678'); procedure TForm1.ActionAddContactExecute(Sender: TObject); var Contact: TAddressBookContact; eMails: TContactEmails; Photo: TBitmapSurface; begin Contact := AddressBook1.CreateContact(FDefaultSource); try try Contact.FirstName := edtFirstName.Text; Contact.LastName := edtLastName.Text; Contact.Phones.AddPhone('Home', '767867679678'); //<<<-------- if not Image1.Bitmap.Size.IsZero then begin Photo := TBitmapSurface.Create; try Photo.Assign(Image1.Bitmap); Contact.Photo := Photo; Image1.Bitmap.SetSize(0, 0); finally Photo.Free; end; end; // Add the work mail eMails := TContactEmails.Create; try eMails.AddEmail(TContactEmail.TLabelKind.Work, edtWorkMail.Text); Contact.eMails := eMails; finally eMails.Free; end; // Save a newly created contact to Address Book AddressBook1.SaveContact(Contact); except on E: EAddressBookException do ShowMessage('Cannot create the contact.' + E.Message); end; // Add the contact to the selected group, if any try if InRange(ComboBox1.ItemIndex, 0, FGroups.Count - 1) then AddressBook1.AddContactIntoGroup (FGroups.Items[ComboBox1.ItemIndex], Contact); except on E: EAddressBookException do ShowMessage('Cannot add the newly created contact to group.' + E.Message); end; ListViewContacts.BeginUpdate; try AddListViewItem(Contact); finally ListViewContacts.EndUpdate; end; TabControl1.ActiveTab := TabItemContacts; finally Contact.Free; end; // Clear the Add Contact Form ClearAddContactForm; end;
-
Understand now thanks
-
found the solution by comment this line Phones.Free;
-
I think all already selected. The first name and last name is added after I recieve external exception 68 error !! but no phone number
-
@programmerdelphi2k I tried like you said but still number was not added. Also sometimes I get stackoverflow erro and external exception 78 error procedure TForm1.ActionAddContactExecute(Sender: TObject); var Contact: TAddressBookContact; Phones: TContactPhones; eMails: TContactEmails; Photo: TBitmapSurface; begin Contact := AddressBook1.CreateContact(FDefaultSource); try try Contact.FirstName := edtFirstName.Text; Contact.LastName := edtLastName.Text; Phones := TContactPhones.Create; try Phones.AddPhone(TContactPhone.TLabelKind.Mobile, '767867679678'); Contact.Phones := Phones; finally Phones.Free; end; if not Image1.Bitmap.Size.IsZero then begin Photo := TBitmapSurface.Create; try Photo.Assign(Image1.Bitmap); Contact.Photo := Photo; Image1.Bitmap.SetSize(0, 0); finally Photo.Free; end; end; // Add the work mail eMails := TContactEmails.Create; try eMails.AddEmail(TContactEmail.TLabelKind.Work, edtWorkMail.Text); Contact.eMails := eMails; finally eMails.Free; end; // Save a newly created contact to Address Book AddressBook1.SaveContact(Contact); except on E: EAddressBookException do ShowMessage('Cannot create the contact.' + E.Message); end; // Add the contact to the selected group, if any try if InRange(ComboBox1.ItemIndex, 0, FGroups.Count - 1) then AddressBook1.AddContactIntoGroup (FGroups.Items[ComboBox1.ItemIndex], Contact); except on E: EAddressBookException do ShowMessage('Cannot add the newly created contact to group.' + E.Message); end; ListViewContacts.BeginUpdate; try AddListViewItem(Contact); finally ListViewContacts.EndUpdate; end; TabControl1.ActiveTab := TabItemContacts; finally Contact.Free; end; // Clear the Add Contact Form ClearAddContactForm; end;
-
This indeed solved the problem in very easy way thanks alot 😍 💐
-
This mean I have to draw at canvas level inside each row in TListView ? ACanvas.DrawSimpleText('"Each dream that you', 2, 25, LFont, LPaint);
-
Hi It is FMX app but I just want to test adding items from code in Windows so I used that code from here var LItem: TListItem; begin LItem := TListItem.Create(ListViewContacts.Items); LItem.Caption := 'new item'; I added "Commctrl" to uses clause but "Caption" is not defined, why ?
-
Thanks @programmerdelphi2k copy from forum and paste into Delphi also copy hidden characters but after removing them the code work
-
interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, System.Permissions, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, Vcl.ComCtrls, Commctrl, FMX.AddressBook.Types, FMX.AddressBook, FMX.StdCtrls, FMX.SearchBox, FMX.Layouts, FMX.ListBox, FMX.Controls.Presentation, FMX.Edit, FMX.TabControl, FMX.Platform, System.Actions, FMX.ActnList, FMX.ListView.Types, FMX.ListView.Appearances, FMX.ListView.Adapters.Base, FMX.ListView, FMX.StdActns, FMX.MediaLibrary.Actions, FMX.Objects, FMX.Surfaces; .... procedure TForm1.FormShow(Sender: TObject); var LItem: TListItem; begin LItem := TListItem.Create(ListViewContacts.Items); LItem.Text := 'new item'; @programmerdelphi2k thanks but still same error.
-
Undeclared identifier: 'Text'
-
When I try to open the sample app contacts I only see FMX splash screen then nothing. I attached the apk here: https://mega.nz/file/OLoDFZRB#GlHVnZv4t9KX4_hmVe91mK9-M1whPoD_SNIWyd2IBv4 any advise ?