Jump to content

WalkingAway

Members
  • Content Count

    22
  • Joined

  • Last visited

Community Reputation

1 Neutral

Recent Profile Visitors

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

  1. WalkingAway

    [MidWare] MidWare, Delphi 12

    François, thank you for your work. It so nice that it is open project and possible to get know how it works. I have builded all the samles and their are working. My questions were based just in found cooments - those SSL and ZHL features. Probably in some point it was implemented (or was some tryout to implement). Also was found some comment about unicode, it was also asked. Thank you.
  2. WalkingAway

    [MidWare] MidWare, Delphi 12

    Thank you so much. It is very useful to know in advance what feature is impossible to find. But itself your framework / libaray is quite good base for simple / educational projects. Thanks.
  3. Just for education purpose decided to test Midware (with Rio additions). In general, it works, but: 1) can get it working with SSL - there is no TSslAppSrvClient component. Do I have use "normal" TAppSrvClient instead? 2) lzh not working - MidWare implementation has f.e. EncryptGetBytes method and second param is LongWord (but in lzh.pas wich was found in internet it has type Word). 3) Is this library support unicode? Can somebody explain me what can I do in order to get it working?
  4. WalkingAway

    Bindings problem

    Solution found Just changed dasetfield from string ti wide string
  5. WalkingAway

    Bindings problem

    Hello I have problem. FMX and Android, TListView with binded DataSet. Phone is EN, but Text := 'äÄåÅ' (SCANDINAVIAN); Items when binded - not displayed properly, but this working correctly: procedure TForm5.ListView1ItemClick(const Sender: TObject; const AItem: TListViewItem); begin AItem.Text := 'äÄåÅ'; end; How to solve this problem? Thank you
  6. WalkingAway

    RTTI and not ordinary data type

    I have here such a sample app. This app using StandFrame component, but it can be plain / pure frame based app. Main question here is: Every frame has "meta" - information about itself (managed by FrameStand), and code is basically the same: procedure TMainForm.PictureButtonClick(Sender: TObject); var LFrameInfo: TFrameInfo<TPictureFrame>; begin LFrameInfo := FrameStand1.New<TPictureFrame>(); LFrameInfo.Frame.Description := 'Example description'; LFrameInfo.Show; end; procedure TMainForm.TextButtonClick(Sender: TObject); var LFrameInfo: TFrameInfo<TTextFrame>; begin LFrameInfo := FrameStand1.New<TTextFrame>(); LFrameInfo.Frame.Text := 'Example text'; LFrameInfo.Show; end; What I did here - one method for all frames (working) function GetFrameInfo<T>: TFrameInfo<T>; begin Result := FrameStand1.New<T>(); Result.Show; end; I'm able to set via RTTI "Text" property in one frame and "Description" in other as they are strings. For simple types it easy. But let's consider there property "MainFrame", it's type is TFrameInfo<T> or TFrameInfo<TFrame>. How to set it with RTTI? Because then I want to link it in the same manner to ListView like AItem.Data[ 'freame_info' ].AsType< TFrameInfo< TFrame > >; And then by clicking to open according frame. I don't entirely understand how to make RTTI understand my TFrameInfo<TFrame >> Thanks in advance demo.zip
  7. WalkingAway

    RTTI and not ordinary data type

    Is it possible to get / set through RTTI non standard type value? I tries, but always got something like 'invalid tapecast' error. Let say I have TFrameMeta<T: TFrame> = class(TGlobalMeta) TGlobalMeta here is: TGlobalMeta = class private What I want - to unified opportunity to set / get "Meta" value , it can be FirstFrame.Meta, SecondFrame.Meta, ... Now I have to write if FirstFrame.Meta is AccountFrame then ... else if FirstFrame.Meta is ReportFrame If I have 50 frames it is too boring. RTTI may help me Or maybe mnthere some libraries for that Thank a lot Also I want to link that kind of link to "Meta" to listview (TValue.From) for same purpose. With no success also so far...
  8. Hi there I have read pretty a lot topics about data-aware components. There are a lot of even funny / useless examples (as examples I put here, found in internet, not mine code). Thinkg about this panel component.... Is it possible to add master-detail feature? Basically, all I need is like cached update. Short example: there are tables "Queries" and "Fields". If user adds / deletes / updates some fields, I want to save either all (both "Queries" and "Fields") or do nothing. Because if user decided to cancel editing - there is no way to do it. Is it possible? Or may be somewhere is component already with suach an option? What I can probably do for now - put all data to tlist, may be then for save I have to loop through manually... Thanks. uDBCalendarView.pas uDBPanel.pas
  9. WalkingAway

    Spring4D + DSharp = RAD Alexandria

    Some debug info. Here is error in this line, "TRttiNamedObject.Name" is nil (abstract error). Probably this is the key difference (new method in Alexandria) and cause of abstract error , but I'm not able to correct this: In Rio working as well both libraries. Hope, maybe some day DSharp will be compatible with Springs 2.
  10. WalkingAway

    Spring4D + DSharp = RAD Alexandria

    thanks Or at least he makes v1 compatible with Alexandria
  11. WalkingAway

    Spring4D + DSharp = RAD Alexandria

    Maybe Stefan can give some hint how to proceed. In some old project (RAD Berlin) I have used Spring4D + DSharp - - both 1.2.1 (and then DDuce's ListDataSource for showing data in GUI). Working well. In modern RAD Alexandria I'm using Spring4D (generally for lists and dep.inj.). But I'm not able to compile DSharp anymore. Only Spring4D 1.2.1 + DSharp 1.2.1 give that pair to compile. But anyway it is not possible to install DSharp designtime packages for binding (it is my goal - to use DSarp as binding library), Delphi throw always "Invalid pointer operation" as long as DSharp.Bindings used in use clause. Can't fix it. Seems like DSarp discontinued or depricated. I can't find version for Alexandria. Actually, ListDataSource from DDuce was removed as depricated, and I have not noticed that in Spring there is similar feature - Spring.Persistence.ObjectDataSet or something similar. So I can probably do the same in pure Spring4d library - bind my own list of class (let say TList<TMySettings>) to bidirectionally binding to grid as ordinary dataset. Thanks in advance.
  12. WalkingAway

    TFruit class moved to component

    Thank you guys! I have got it. Just came here to ask next level's question and saw unread messages I will check those books of course But anyway, is it possible to achieve something like this (I mean totally in IDE, design time): I have basic class TSQLBuilder and then it has property TSQLBuilderProvider - abstract, it can be let say FireDac, UniDac, AnyDac... 1) For every of them then can be setted up Query + Connection: for FD - TFDQuery and TFDConnection, for UniDAC - TUniConnection and TUniQuery and so one So far I did it through connectionString property, but it's boring as I have to build it outside this component Something similar to this - drop TSQLBuilder to the form and then there is some abstract property TSQLBuilderProvider, but if on form on f.e. TSQLBuilderProviderFD or TSQLBuilderProviderUniDac, it was possible to set it in design time. 2) Second thing: property that makes sence for one TSQLBuilder, but not usable / posible for other. For example if I chose FD as type, then there is type string property - MySQL, MSSQL or SQLite. I dont need obviously this property forTSQLBuilderProviderFireBird. Probably this option have to be hidden according to other property Thank you so much Of course, its pretty hard to make something good enough, this topic more about education I guess. Thanks again
  13. WalkingAway

    TFruit class moved to component

    Let say I have this class, TFruit: unit MyUnit; interface uses SysUtils; type TFruit = Class private color : string; protected public constructor Create(color: string); published property color: string read string end; I can make the instance rocedure TForm1.FormCreate(Sender: TObject); var banana : TFruit; begin banana := TFruit.Create('red'); Now: How I can achive the same functionality if it would possible to make component - the same TFruit and visible property color in IDE? And then if I drop component, this instance of TFRuit is made for me automatically... Is it possible? For now only I can imagine - some / any TComponent descendant and some FFruit: TFruit property... Thanks
  14. WalkingAway

    custom TTreeView

    Thank you so much for your answers, I will check everything. It opens my mind. Of course, probably better idea to use something available, f.e. VirtualTreeView. But I tried just for educational purpose. Thank you again. Some of mistakes were not visible for me at all...
  15. WalkingAway

    custom TTreeView

    Hello Just have created simple TTreeView based component. There are memory leaks. Reason, that New(Pointer) and then Dispose(Pointer) - second one not implemented yet. To handle this, I got to Destroy. But interesting that in Destroy method Items.Count is empty, somehow everithing is freed already... Why? Do I have to keep and track own ToDelete list for that? pas file in the attachement Thanks. myComponent.txt
×