Jump to content

xorpas

Members
  • Content Count

    25
  • Joined

  • Last visited

Community Reputation

2 Neutral

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. xorpas

    save all item from listview with DynamicAppearance

    Thank you It Work a Perfetc Now thank you again
  2. xorpas

    save all item from listview with DynamicAppearance

    I can't Understand what line you mean Please Can you modify this code to work
  3. xorpas

    save all item from listview with DynamicAppearance

    The same problem procedure TForm1.ListView1ItemClick(const Sender: TObject; const AItem: TListViewItem); begin AItem1 := AItem; name := AItem1.Data['Text1'].AsString; phone := AItem1.Data['Text2'].AsString; index := AItem1.Data['Text3'].AsString; end; procedure TForm1.MenuItem1Click(Sender: TObject); var I: integer; list: TStringList; begin list := TStringList.Create; for I := 0 to ListView1.Items.Count - 1 do begin AItem1 := ListView1.Items[I]; ListView1.Selected := AItem1; list.Add(name + sLineBreak + phone + sLineBreak + index + sLineBreak); end; list.SaveToFile('C:\Users\Gt\Desktop\TestContactBack.vcf'); list.Free; end;
  4. How can save all item from listview with DynamicAppearance I use this code but it save only first item procedure TForm1.ListView1ItemClick(const Sender: TObject; const AItem: TListViewItem); var I: integer; AItem1: TListViewItem; list: TStringList; begin list := TStringList.Create; for I := 0 to ListView1.Items.Count - 1 do begin ListView1.Selected := ListView1.Items[I]; name := AItem.Data['Text1'].AsString; phone := AItem.Data['Text2'].AsString; index := AItem.Data['Text3'].AsString; list.Add(name + sLineBreak + phone + sLineBreak + index + sLineBreak); end; list.SaveToFile('C:\Users\Gt\Desktop\TestContactBack.vcf'); list.Free; end;
  5. xorpas

    Display a form created in Fmx ANDROID Many time

    Thank you I resolve it ,Scrolbar not showing in android that all ,thank you
  6. H I I Have an issue with fmx android when run app it display a form Created in the first click But not in the second click , It work perfectly in Windows but not in android I use VertScrollBox as parent this is my code var f: TForm3; begin f := TForm3.Create(self); f.Layout1.Align := TAlignLayout.Top; f.TXTID.Text := ID; self.AddObject(f.Layout1); end;
  7. Thank you The problem is in the Host url I fixe it thank you
  8. How to resolve TNetHTTPClient Maximum number of redirections (5) exceeded ?
  9. xorpas

    fmx listview items bidi mode on android

    Install rtl fixer http://www.fmxrtl.com/purchase.php or http://arabteam2000-forum.com/index.php?/topic/300470-واخيرا-الكتابة-بالعربي-للأندرويد-في-الدلفي/
  10. xorpas

    full screen view capture

    How you solved this problem Can you put Your Code Hier ?
  11. Thank you not equal Have you Direct Link Please I cant Download from this website https://cc.embarcadero.com/item/30896 I need delphi not c++ if can
  12. I use the .ISO installer The length of the path environment variable can be a problem How can Change it
  13. I f you Have this two File I need them to replace in my path
  14. 1)yes ,vcl260.bpl exists. 2) Yes it have a "valid size". 3) No 4) I d'ont Knew
×