iOS Delphi Component is a non-visual component that gives access to iPhone/iPAD (iOS 5+) contacts and calendars. You can read/write groups, calendars, events and contacts directly from/to iOS device over Wi-Fi from Windows machine.
Component uses iOS app (to demo the iOS client please email us and we will send back the Ad-Hoc distributed iOS app which you can install using iTunes) and Windows component counterpart that acts as a server.
The component supports Delphi 7 and higher versions and works directly with iOS using official Apple API.
Starting server on port 21113 and waiting for connection. OnClientConnect event is triggered if client is connected. All other events can also be utilized.
iPhoneServ := TiPhoneServer.Create; iPhoneServ.OnLog := OnLog; iPhoneServ.OnContactsReceived := OnContactsReceived; iPhoneServ.OnContactStatusesReceived := OnContactStatusesReceived; iPhoneServ.OnCalendarsReceived := OnCalendarsReceived; iPhoneServ.OnCalendarsStatusesReceived := OnCalendarsStatusesReceived; iPhoneServ.OnClientConnect := OnConnDisconn; iPhoneServ.OnClientDisconnect := OnConnDisconn; iPhoneServ.Port := 21113; iPhoneServ.LogFilename := '_Log.txt'; iPhoneServ.Start;
Adding a new contact "John" with phone number "+555-55-55" and email address "email@gmail.com".
With TiPSContacts.Create(iPhoneServ) do
begin
FirstName := 'John';
With NewPhone do
Begin
FieldType := 'Home';
Number := '+555-55-55';
End;
With NewEMail do
Begin
FieldType := 'Home';
Address := 'email@gmail.com';
End;
Store;
End;
Deleting a contact.
SomeContact.Delete;
Download server working example.
Contact us to get the iOS client app.
Note! The trial version of the server component is available upon request.
IDC 1.0
Jan. 23, 2012