Picasa Delphi Component is a non-visual component that allows to work with Google Picasa using Delphi. The component supports Delphi 7 and higher Delphi versions and works directly with Google using official API. Official API use guarantees maximum compatibility and fewest possible modifications to future versions.
Connecting to Picasa and showing list of media items in listbox.
Picasa := TPicasa.Create;
Picasa.SourceName := 'companyName-appName-verID'; //enter your own string
Picasa.Connect('email@address.com', 'password');
Picasa.LoadAlbums;
SomeAlbum := Picasa.Albums[0];
for I := 0 to SomeAlbum.MediaItemsCount - 1 do
ListBox1.Items.Add(Picasa.MediaItems[I].Name);
Uploading media item "picture.jpg".
SomeAlbum.FileUpload('picture.jpg');
Deleting media item with index number 5.
SomeAlbum.MediaItems[5].Delete;
Download working example.
Note! The trial version of the component is available upon request.
PDC 1.0
Feb. 17, 2012