AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Android ListView Image Click

Ein Thema von danten · begonnen am 14. Jan 2019
Antwort Antwort
danten

Registriert seit: 19. Feb 2012
Ort: Czech Republic, Prag
126 Beiträge
 
Delphi 10.1 Berlin Architect
 
#1

Android ListView Image Click

  Alt 14. Jan 2019, 00:53
How can I change the image when I click on the created DynamicAppearance -> Item -> TImageObjectApperance.
I would like to add two buttons and I will also need to capture the event so that clicks return the name of the component to which the ListView clicks and id values are clicked?

Thank you

Delphi-Quellcode:

procedure TfrmMain.ListView1ItemClick(const Sender: TObject;
  const AItem: TListViewItem);
begin
  lvItem := AItem;
end;

procedure TfrmMain.ListView1ItemClickEx(const Sender: TObject;
  ItemIndex: Integer; const LocalClickPos: TPointF;
  const ItemObject: TListItemDrawable);
var
  str: string;
  ch: boolean;
begin
  if (LocalClickPos.X > (ListView1.Width - 50)) and (LocalClickPos.Y > 150) then
  begin
    str := lvItem.Detail;
    if lvItem.Objects.FindObjectT<TListItemImage>('imgMini').Bitmap = imageNo.Bitmap then
    begin
      lvItem.Objects.FindObjectT<TListItemImage>('imgMini').Bitmap := imageYes.Bitmap;
      ch := True;
    end else
    begin
      lvItem.Objects.FindObjectT<TListItemImage>('imgMini').Bitmap := imageNo.Bitmap;
      ch := False;
    end;
  end;
  
  if ch = False then
  begin
    Query1.ExecSQL('UPDATE select_table SET isChecked = 0, id_value = '+QuotedStr(str)+';');
  end else
  begin
    Query1.ExecSQL('UPDATE select_table SET isChecked = 1, id_value = '+QuotedStr(str)+';');
  end;

end;
Miniaturansicht angehängter Grafiken
android_listview_buttons_and_image.png  
Daniel

Geändert von danten (14. Jan 2019 um 01:14 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:12 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz