Bonjour
Tout est dans le titre !
Il s'agit d'un test avec TListview.
Bonjour
Tout est dans le titre !
Il s'agit d'un test avec TListview.
Bonjour,
Oui j'ai mais c'est pour quoi faire exactement ?
Merci
Un test très rapide :
Créer une application multi-périphériques (application vide) en conservant le style windows par défaut pour commencer
Ajouter un TListview
Basculer en mode conception
Personnaliser les item avec DynamicAppearance an ajoutant au choix un text, un bouton, etc.
( ici, j'ai ajouté 2 textes, un bouton et 2 images)
Ensuite, définir le style IOS puis choisir un iphone dans les cibles disponibles
Chez moi, sur Berlin "de base" (sans update), ça crash l'IDE en me disant
---------------------------
Erreur
---------------------------
Impossible d'affecter TAppearanceObjectItem à TAppearanceObjectItem.
---------------------------
OK Détails >>
---------------------------
[50155A75]{rtl240.bpl } System.Classes.TPersistent.AssignError (Line 5519, "System.Classes.pas" + 4) + $36
[50155ABD]{rtl240.bpl } System.Classes.TPersistent.AssignTo (Line 5524, "System.Classes.pas" + 0) + $1
[501559F3]{rtl240.bpl } System.Classes.TPersistent.Assign (Line 5509, "System.Classes.pas" + 0) + $7
[0853C370]{fmx240.bpl } FMX.ListView.DynamicAppearance.TDynamicAppearance.ObjectRemoving (Line 168, "FMX.ListView.DynamicAppearance.pas" + 1) + $1
[50156210]{rtl240.bpl } System.Classes.TCollection.Assign (Line 5811, "System.Classes.pas" + 10) + $24
[21266300]{designide240.bpl} Update.TUpdateObject.Update (Line 1134, "Update.pas" + 54) + $E
[21266290]{designide240.bpl} Update.TUpdateObject.Update (Line 1120, "Update.pas" + 40) + $3
[21265EE0]{designide240.bpl} Update.UpdateOrder (Line 1036, "Update.pas" + 29) + $3
[21266335]{designide240.bpl} Update.TUpdateObject.Update (Line 1139, "Update.pas" + 59) + $9
[500601B8]{rtl240.bpl } System.TMonitor.Destroy (Line 18078, "System.pas" + 0) + $0
[5005F839]{rtl240.bpl } System.TObject.CleanupInstance (Line 16698, "System.pas" + 37) + $0
[5005A1A8]{rtl240.bpl } System.@FreeMem (Line 4662, "System.pas" + 20) + $0
[5005F618]{rtl240.bpl } System.TObject.FreeInstance (Line 16461, "System.pas" + 2) + $2
[21266D6D]{designide240.bpl} Update.TUpdateManager.Update (Line 1470, "Update.pas" + 22) + $9
[21266659]{designide240.bpl} Update.TUpdateManager.UpdateChildren (Line 1258, "Update.pas" + 2) + $A
[21266620]{designide240.bpl} Update.TUpdateManager.Modified (Line 1240, "Update.pas" + 2) + $2
[2128DEE6]{designide240.bpl} ComponentDesigner.TComponentRoot.ModifiedUpdateNotification (Line 3095, "ComponentDesigner.pas" + 2) + $8
[2128E020]{designide240.bpl} ComponentDesigner.TComponentRoot.Modified (Line 3115, "ComponentDesigner.pas" + 13) + $2
[2128E06D]{designide240.bpl} ComponentDesigner.TComponentRoot.Modified (Line 3122, "ComponentDesigner.pas" + 20) + $5
[0C96B1F8]{fmxdesigner240.bpl} FmxFormContainer.TControlSizer.ResizeControl (Line 2457, "FmxFormContainer.pas" + 78) + $8
[0C966ADD]{fmxdesigner240.bpl} FmxFormContainer.TFormContainerForm.DesignerOpened (Line 803, "FmxFormContainer.pas" + 7) + $6
[2129E0B0]{designide240.bpl} ComponentDesigner.DesignNotificationDesignerOpened (Line 8845, "ComponentDesigner.pas" + 5) + $B
[212935A0]{designide240.bpl} ComponentDesigner.TComponentRoot.InternalInitializeDesigner (Line 5009, "ComponentDesigner.pas" + 16) + $5
[2128BD16]{designide240.bpl} ComponentDesigner.TComponentRoot.Create (Line 2281, "ComponentDesigner.pas" + 45) + $5
[0C9775D2]{fmxdesigner240.bpl} FmxFormDesigner.TFmxRootDesigner.Create (Line 545, "FmxFormDesigner.pas" + 1) + $2D
[0C979BEB]{fmxdesigner240.bpl} FmxFormDesigner.TFmxFormDesigner.CreateRoot (Line 1713, "FmxFormDesigner.pas" + 3) + $2F
[2129317F]{designide240.bpl} ComponentDesigner.TComponentRoot.InternalAddView (Line 4948, "ComponentDesigner.pas" + 4) + $68
[21292232]{designide240.bpl} ComponentDesigner.TComponentRoot.AddView (Line 4636, "ComponentDesigner.pas" + 18) + $8
[500A04F2]{rtl240.bpl } System.SysUtils.Supports (Line 25564, "System.SysUtils.pas" + 1) + $9
[212E97C8]{designide240.bpl} EmbeddedFormDesigner.TEditorFormDesigner.DoAddView (Line 210, "EmbeddedFormDesigner.pas" + 3) + $7
[212E612F]{designide240.bpl} ViewSelector.TViewSelectorFrame.cbDeviceSelectorChange (Line 157, "ViewSelector.pas" + 11) + $9
[50AC7B18]{vcl240.bpl } Vcl.StdCtrls.TCustomCombo.Change (Line 4446, "Vcl.StdCtrls.pas" + 2) + $12
[50AC7080]{vcl240.bpl } Vcl.StdCtrls.TCustomComboBox.Change (Line 4088, "Vcl.StdCtrls.pas" + 4) + $2
[50AC7CE3]{vcl240.bpl } Vcl.StdCtrls.TCustomCombo.Select (Line 4501, "Vcl.StdCtrls.pas" + 4) + $4
[50AC7A96]{vcl240.bpl } Vcl.StdCtrls.TCustomCombo.CNCommand (Line 4423, "Vcl.StdCtrls.pas" + 24) + $6
[50AA3B2A]{vcl240.bpl } Vcl.Controls.TControl.WndProc (Line 7313, "Vcl.Controls.pas" + 91) + $6
[50060744]{rtl240.bpl } System.TMonitor.TryEnter (Line 18445, "System.pas" + 10) + $0
[50067FF6]{rtl240.bpl } System.TInstBucket.RemoveInstItem (Line 36922, "System.pas" + 1) + $4
[50060148]{rtl240.bpl } System.TMonitor.CheckOwningThread (Line 18056, "System.pas" + 2) + $0
[50060744]{rtl240.bpl } System.TMonitor.TryEnter (Line 18445, "System.pas" + 10) + $0
[50067FF6]{rtl240.bpl } System.TInstBucket.RemoveInstItem (Line 36922, "System.pas" + 1) + $4
[50060148]{rtl240.bpl } System.TMonitor.CheckOwningThread (Line 18056, "System.pas" + 2) + $0
[50060452]{rtl240.bpl } System.TMonitor.Exit (Line 18242, "System.pas" + 1) + $2
[50AA8675]{vcl240.bpl } Vcl.Controls.TWinControl.WndProc (Line 10143, "Vcl.Controls.pas" + 158) + $6
[5017CE5C]{rtl240.bpl } System.Classes.{System.Generics.Collections}TDictionary<System.Integer,System.Classes.IInterfaceList>.TryGetValue (Line 6479, "System.Generics.Collections.pas" + 6) + $2
[50175A35]{rtl240.bpl } System.Classes.TObservers.IsObserving (Line 19324, "System.Classes.pas" + 1) + $F
[50175AB0]{rtl240.bpl } System.Classes.TObservers.IsObserving (Line 19334, "System.Classes.pas" + 11) + $20
[50AC7973]{vcl240.bpl } Vcl.StdCtrls.TCustomCombo.WndProc (Line 4395, "Vcl.StdCtrls.pas" + 70) + $4
[50AC92C5]{vcl240.bpl } Vcl.StdCtrls.TCustomComboBox.WndProc (Line 5107, "Vcl.StdCtrls.pas" + 27) + $4
[50AA3764]{vcl240.bpl } Vcl.Controls.TControl.Perform (Line 7091, "Vcl.Controls.pas" + 10) + $8
[50AA87DB]{vcl240.bpl } Vcl.Controls.DoControlMsg (Line 10212, "Vcl.Controls.pas" + 12) + $11
[50AA9267]{vcl240.bpl } Vcl.Controls.TWinControl.WMCommand (Line 10487, "Vcl.Controls.pas" + 1) + $5
[50AA3B2A]{vcl240.bpl } Vcl.Controls.TControl.WndProc (Line 7313, "Vcl.Controls.pas" + 91) + $6
[50AA95A4]{vcl240.bpl } Vcl.Controls.TWinControl.WMWindowPosChanging (Line 10623, "Vcl.Controls.pas" + 11) + $6
[50AC9317]{vcl240.bpl } Vcl.StdCtrls.TCustomComboBox.WMPaint (Line 5140, "Vcl.StdCtrls.pas" + 10) + $2
[5005FC93]{rtl240.bpl } System.TObject.Dispatch (Line 17347, "System.pas" + 11) + $0
[50AA3B2A]{vcl240.bpl } Vcl.Controls.TControl.WndProc (Line 7313, "Vcl.Controls.pas" + 91) + $6
[50AA8675]{vcl240.bpl } Vcl.Controls.TWinControl.WndProc (Line 10143, "Vcl.Controls.pas" + 158) + $6
[50060744]{rtl240.bpl } System.TMonitor.TryEnter (Line 18445, "System.pas" + 10) + $0
[500602C4]{rtl240.bpl } System.TMonitor.Enter (Line 18138, "System.pas" + 4) + $2
[50060744]{rtl240.bpl } System.TMonitor.TryEnter (Line 18445, "System.pas" + 10) + $0
[50AA8675]{vcl240.bpl } Vcl.Controls.TWinControl.WndProc (Line 10143, "Vcl.Controls.pas" + 158) + $6
[500604A3]{rtl240.bpl } System.TMonitor.Exit (Line 18264, "System.pas" + 2) + $7
[50A855AF]{vcl240.bpl } Vcl.Graphics.FreeMemoryContexts (Line 7056, "Vcl.Graphics.pas" + 12) + $8
[50AA7C94]{vcl240.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9850, "Vcl.Controls.pas" + 3) + $6
[50AA7CA9]{vcl240.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9853, "Vcl.Controls.pas" + 6) + $0
[50AA7C94]{vcl240.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9850, "Vcl.Controls.pas" + 3) + $6
[50170C64]{rtl240.bpl } System.Classes.StdWndProc (Line 17178, "System.Classes.pas" + 8) + $0
[50BEA647]{vcl240.bpl } Vcl.Forms.ProcessUpdate (Line 7475, "Vcl.Forms.pas" + 1) + $11
[50AA8786]{vcl240.bpl } Vcl.Controls.TWinControl.DefaultHandler (Line 10184, "Vcl.Controls.pas" + 30) + $19
[50AA9276]{vcl240.bpl } Vcl.Controls.TWinControl.WMCommand (Line 10487, "Vcl.Controls.pas" + 1) + $14
[50AA3B2A]{vcl240.bpl } Vcl.Controls.TControl.WndProc (Line 7313, "Vcl.Controls.pas" + 91) + $6
[50BEA647]{vcl240.bpl } Vcl.Forms.ProcessUpdate (Line 7475, "Vcl.Forms.pas" + 1) + $11
[5005FA96]{rtl240.bpl } System.@IsClass (Line 16965, "System.pas" + 1) + $8
[50BEA6B0]{vcl240.bpl } Vcl.Forms.TraverseClients3 (Line 7492, "Vcl.Forms.pas" + 5) + $1E
[50BEA6CA]{vcl240.bpl } Vcl.Forms.TraverseClients3 (Line 7492, "Vcl.Forms.pas" + 5) + $38
[50AA6DF6]{vcl240.bpl } Vcl.Controls.TWinControl.GetControl (Line 9230, "Vcl.Controls.pas" + 4) + $A
[5005FA96]{rtl240.bpl } System.@IsClass (Line 16965, "System.pas" + 1) + $8
[50BEA6BB]{vcl240.bpl } Vcl.Forms.TraverseClients3 (Line 7492, "Vcl.Forms.pas" + 5) + $29
[50060744]{rtl240.bpl } System.TMonitor.TryEnter (Line 18445, "System.pas" + 10) + $0
[50067FF6]{rtl240.bpl } System.TInstBucket.RemoveInstItem (Line 36922, "System.pas" + 1) + $4
[50060148]{rtl240.bpl } System.TMonitor.CheckOwningThread (Line 18056, "System.pas" + 2) + $0
[50060452]{rtl240.bpl } System.TMonitor.Exit (Line 18242, "System.pas" + 1) + $2
[50AA8675]{vcl240.bpl } Vcl.Controls.TWinControl.WndProc (Line 10143, "Vcl.Controls.pas" + 158) + $6
[5017CE5C]{rtl240.bpl } System.Classes.{System.Generics.Collections}TDictionary<System.Integer,System.Classes.IInterfaceList>.TryGetValue (Line 6479, "System.Generics.Collections.pas" + 6) + $2
[50175A35]{rtl240.bpl } System.Classes.TObservers.IsObserving (Line 19324, "System.Classes.pas" + 1) + $F
[50175AB0]{rtl240.bpl } System.Classes.TObservers.IsObserving (Line 19334, "System.Classes.pas" + 11) + $20
[50AC7973]{vcl240.bpl } Vcl.StdCtrls.TCustomCombo.WndProc (Line 4395, "Vcl.StdCtrls.pas" + 70) + $4
[50AC92C5]{vcl240.bpl } Vcl.StdCtrls.TCustomComboBox.WndProc (Line 5107, "Vcl.StdCtrls.pas" + 27) + $4
[50B95113]{vcl240.bpl } Vcl.Themes.TStyleManager.GetIsCustomStyleActive (Line 5513, "Vcl.Themes.pas" + 0) + $7
[50B989F1]{vcl240.bpl } Vcl.Themes.TCustomStyleEngine.HookCBProc (Line 7365, "Vcl.Themes.pas" + 3) + $0
[50AA7C94]{vcl240.bpl } Vcl.Controls.TWinControl.MainWndProc (Line 9850, "Vcl.Controls.pas" + 3) + $6
[50170C64]{rtl240.bpl } System.Classes.StdWndProc (Line 17178, "System.Classes.pas" + 8) + $0
[20513446]{coreide240.bpl} IDETimerServices.AFKCBTProc (Line 239, "IDETimerServices.pas" + 6) + $F
[50C4D7D3]{vcl240.bpl } Vcl.AppEvnts.TMultiCaster.GetAppEvents (Line 655, "Vcl.AppEvnts.pas" + 1) + $3
[50BEFFDD]{vcl240.bpl } Vcl.Forms.TApplication.CancelHint (Line 11363, "Vcl.Forms.pas" + 6) + $D
[50BEEC6F]{vcl240.bpl } Vcl.Forms.TApplication.ProcessMessage (Line 10534, "Vcl.Forms.pas" + 23) + $1
[50BEECB2]{vcl240.bpl } Vcl.Forms.TApplication.HandleMessage (Line 10564, "Vcl.Forms.pas" + 1) + $4
[50BEEFE5]{vcl240.bpl } Vcl.Forms.TApplication.Run (Line 10702, "Vcl.Forms.pas" + 26) + $3
Le but étant de savoir si ça fait pareil avec les update de Belin
Aucun problème pour moi en Update 2
arf ... ça veut dire qu'il faut que je passe l'update
ça m'arrange pas trop :-(
Un collègue a voulu installer directement Berlin avec l'update 2 et son delphi ne démarre même pas.
Ca me rend plutôt frileux sur ce coup là.
Mais bon, si j'ai plus le choix ....
Merci pour le test
Il l'a fait à partir de l'iso avec update 2 inclus.
Je ferai un ghost de mon disque avant de tenter l'aventure.
Parce que si ça plante, je peux plus bosser
Ou alors, si tu bosses avec Windows virtualisé, c + simple car il suffit de faire une sauvegarde de la VM en créant un snapshot.
J'ai une dizaine de VM Hyper-V sur mon poste avec diverses versions de Delphi mais manque de bol, Berlin est le seul qui soit sur mon poste principal
C'était un peu obligé pour éviter des manipulations pénibles pour deboguer mon appli sur iphone.
Sinon, j'aurais fais ça.
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager