Stéphane Wierzbicki
Members-
Content Count
232 -
Joined
-
Last visited
Everything posted by Stéphane Wierzbicki
-
No criticism @Remy Lebeau but why SSH was never implemented into Indy?
-
Sorry for the confusion @Remy LebeauI need to connect to an SFTP server!
-
Is it a bug? Using class helper into a package will "screwed" bpl output
Stéphane Wierzbicki posted a topic in Delphi IDE and APIs
Hello, I spent hours on this.... to discover that my BPL are screwed as soon as I use a class helper in any pas file involved to build the package. Is this "normal"? When calling a class helper function my bpl output will be 250kb When removing the class heler my bpl output will be more than one 1.089kb Regards -
Is it a bug? Using class helper into a package will "screwed" bpl output
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in Delphi IDE and APIs
You are right.... It's my mind who was screwed.... Sorry but I found my mistake. I'm working with JVCL Plugin manager and I've created a bunch of plugins (packages). I forgot to update interfaces where I used the same GUID... Some of my packages where (badly) configure with GUI units (thus the output bpl size was bigger) Sorry for this bad topic ! -
I need a component or a library that allows me to connect to a sFTP server. I will check links you and @WillH posted.
-
Does it help? https://stackoverflow.com/questions/37593507/how-can-i-change-an-environment-variable-and-have-other-apps-see-the-value-witho
-
Hi @Uwe Raabe Will it make sens to get MMX a new "Find Unit...' feature? I'm really fade up with EMB 'Find Unit...' feature.... It is bugging 90%...
-
Working Find Unit...
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in MMX Code Explorer
I was more looking for a feature that find the unit of the "unknown" class under the cursor. Thank you anyway. Ps: I just found that SHIFT-ALT U did the trick... -
Working Find Unit...
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in MMX Code Explorer
@Jacek Laskowski, @Dinar thank you for the information. I was not aware of this nice plugin. -
Hello, Does anyone know how to store a TFDMemtable with its indexes? TFDMemtable.SaveToFile does not save indexes, I tried different formats ( sfXM,sfBinary,sfJSON). I've also tried to either add indexes with TFDMemtable.IndexDefs or with TFDMemtable.Indexes. StoreItems is set to [siData, siDelta, siMeta]. I'm clueless. Any idea?
-
TFDMemtable does not save indexdefs definitions
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in Databases
Looks like a feature request to put on quality central... -
TFDMemtable does not save indexdefs definitions
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in Databases
@Uwe Raabe this could be an explanation but this can't be the reason why they are not stored (BTW FieldDefs are stored in the saved file). The only solution I'm thinking to is to create a separate list that will hold indexes information. This is cumbersome as this could be done with the TFDMemTabble.SaveToFile method. -
TFDMemtable does not save indexdefs definitions
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in Databases
@Dmitry Arefiev do you know maybe a workaround? -
How can I delete an archive Item using TZipFile class
Stéphane Wierzbicki posted a topic in RTL and Delphi Object Pascal
Hello, Anyone knows how I can delete an archive Item using TZipFile class ? I found a TZipFileHelper class helper on the net. It is useless since we cannot access TZipFile private members anymore. procedure TZipFileHelper.Delete(FileName: string); var i, j: Integer; StartOffset, EndOffset, Size: UInt32; Header: TZipHeader; Buf: TBytes; begin i := IndexOf(FileName); if i <> -1 then begin // Find extents for existing file in the file stream StartOffset := Self.FFiles[i].LocalHeaderOffset; EndOffset := Self.FEndFileData; for j := 0 to Self.FFiles.Count - 1 do begin if (Self.FFiles[j].LocalHeaderOffset > StartOffset) and (Self.FFiles[j].LocalHeaderOffset <= EndOffset) then EndOffset := Self.FFiles[j].LocalHeaderOffset; end; Size := EndOffset - StartOffset; // Update central directory header data Self.FFiles.Delete(i); for j := 0 to Self.FFiles.Count - 1 do begin Header := Self.FFiles[j]; if Header.LocalHeaderOffset > StartOffset then begin Header.LocalHeaderOffset := Header.LocalHeaderOffset - Size; Self.FFiles[j] := Header; end; end; // Remove existing file stream SetLength(Buf, Self.FEndFileData - EndOffset); Self.FStream.Position := EndOffset; if Length(Buf) > 0 then Self.FStream.Read(Buf[0], Length(Buf)); Self.FStream.Size := StartOffset; if Length(Buf) > 0 then Self.FStream.Write(Buf[0], Length(Buf)); Self.FEndFileData := Self.FStream.Position; end; end; ps: I'm using Delphi RIO -
How can I delete an archive Item using TZipFile class
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in RTL and Delphi Object Pascal
Thank you. That is clearly a bug ! I'm surprised EMB did not fixed it!. -
Delphi and MVVM Framework
Stéphane Wierzbicki replied to Mavarik's topic in Tips / Blogs / Tutorials / Videos
Just to let you know that nothing happens as soon I press the finish button... -
Report components: good, bad, ugly
Stéphane Wierzbicki replied to Bill Meyer's topic in Delphi Third-Party
I'll say take a look at Fastreport. -
Cannot build my projects since applying the "Building Changed Files Patch"
Stéphane Wierzbicki posted a topic in Delphi IDE and APIs
Hi, I'm worried with latest Rad Studio 10.3.2 version. I have applied Building Changed Files Patch but my modified pascal files (not saved) are no more taken on compiltion More, I'm suddenly getting weird erros that prevent me building my project... : [dcc32 Error] ETL.pas(360): E2005 'Exception' is not a type identifier on exception blocks... or [dcc32 Error] ETL.pas(450): E2029 '.' expected but ';' found Am I the only one suffering from this? Regards -
Cannot build my projects since applying the "Building Changed Files Patch"
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in Delphi IDE and APIs
Yes, I already tried it! -
Cannot build my projects since applying the "Building Changed Files Patch"
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in Delphi IDE and APIs
As written in my second post, the compiler error was caused by a name collision. Maybe my post was too confusing.... "Building changed files" bug still persist until I remove IDE FixPack. -
JSON - Why self ins't updated with new values ?
Stéphane Wierzbicki posted a topic in Network, Cloud and Web
Hi, I cannot get this procedure TPerson.LoadSettings(const aJsonString: String). Is there any reason why self instance is not updated with new value ? Is their any workaround or should I create a LoadSettings method outside TPerson ? program Project1; {$APPTYPE CONSOLE} {$R *.res} uses System.SysUtils, REST.JSON, Unit1 in 'Unit1.pas'; var Person:TPerson; jsonstr:string; begin try Person:=TPerson.Create; try person.Name := 'Hello'; jsonstr:= Person.SaveSettings; writeln(jsonstr); //write {"name":"hello"} person.Name := 'hi'; Person.LoadSettings(jsonstr); writeln(person.Name); //write hi instead of Hello readln; finally Person.Free; end; except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; end. unit Unit1; interface type TPerson = class(TObject) private FName: string; public procedure LoadSettings(const aJsonString: String); function SaveSettings: string; property Name: string read FName write FName; end; implementation uses REST.JSON; procedure TPerson.LoadSettings(const aJsonString: String); begin self := TJSon.JsonToObject<TPerson>(aJsonString); end; function TPerson.SaveSettings: string; begin result := TJSon.ObjectToJsonString(self); end; end. Ps: I'm using Delphi RIO Updt 2 -
Cannot build my projects since applying the "Building Changed Files Patch"
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in Delphi IDE and APIs
Removing IDE Fix Pack solved the problem. @jbg are you aware of this incompatibility ? -
Cannot build my projects since applying the "Building Changed Files Patch"
Stéphane Wierzbicki replied to Stéphane Wierzbicki's topic in Delphi IDE and APIs
I do have an explanation for [dcc32 Error] ETL.pas(360): E2005 'Exception' is not a type identifier on exception blocks... I'm using TMS Logging and there is a TTMSLoggerLogLevel type defined like this : Despite this "non error", IDE modified files still have to be saved.... -
Hi, I'm trying to install JCL/JVCL on RIO 10.3.2. Both JCL and JVCL compiles without errors. No success. I don't see any JVCL package loaded in the IDE ! Any clues?
-
That's fine for me 👍.