Jordi Corbilla JordiCorbilla
JordiCorbilla
/ curl.cmd
Created
May 21, 2016 22:37
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| curl -X POST \ | |
| -H "X-Parse-Application-Id: thunderParse" \ | |
| -H "Content-Type: application/json" \ | |
| -d '{"version":"0.0","Id":"1","photos":100,"views":100,"likes":100,"comments":100}' \ | |
| http://localhost:1337/parse/classes/Instances |
JordiCorbilla
/ DelphiPARSEServercall.pas
Last active
May 26, 2016 21:45
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /** | |
| * @Author: Jordi Corbilla | |
| * (c) Copyright by Jordi Corbilla. | |
| **/ | |
| //Usage -> UpdateClient('1', 100, 100, 100, 100, '0.0'); | |
| function UpdateClient(id: string; photos, views, likes, comments: integer; version: string): boolean; | |
| var | |
| IdHTTP: TIdHTTP; |
JordiCorbilla
/ DelphiPARSEHerokucall.pas
Last active
May 26, 2016 21:44
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /** | |
| * @Author: Jordi Corbilla | |
| * (c) Copyright by Jordi Corbilla. | |
| **/ | |
| //Usage -> UpdateClient('1', 100, 100, 100, 100, '0.0'); | |
| function UpdateClient(id: string; photos, views, likes, comments: integer; version: string): boolean; | |
| var | |
| IdHTTP: TIdHTTP; |
JordiCorbilla
/ dcov_paths.lst
Created
May 26, 2016 20:23
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| C:\ThundaxDelphiRepository\thundax-delphi-personal-repository\src\Design Patterns\ |
JordiCorbilla
/ dcov_execute.bat
Created
May 26, 2016 20:24
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| CodeCoverage.exe -e "thundax.DesignPatternsTest.exe" -m "thundax.DesignPatternsTest.map" -ife -uf dcov_units.lst -spf dcov_paths.lst -od ".\" -lt -html -xml -emma -meta |
JordiCorbilla
/ emma.cmd
Created
May 26, 2016 20:24
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| java -cp emma.jar emma report -r html -in coverage.em,coverage.ec |
JordiCorbilla
/ dcov_units.lst
Created
May 26, 2016 20:32
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| thundax.Prototype | |
| thundax.AbstractFactory |
JordiCorbilla
/ TUML.pas
Last active
May 26, 2016 21:44
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /** | |
| * @Author: Jordi Corbilla | |
| * (c) Copyright by Jordi Corbilla. | |
| **/ | |
| TUML = class(TObject) | |
| private | |
| FFormat: string; | |
| FOutFile: TLog; | |
| FUmlFileName: string; |
JordiCorbilla
/ TestTUML.pas
Last active
May 26, 2016 21:44
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /** | |
| * @Author: Jordi Corbilla | |
| * (c) Copyright by Jordi Corbilla. | |
| **/ | |
| procedure TestTUML.TestUMLDiagramAsynchronous; | |
| var | |
| lock: TCriticalSection; | |
| thread1, thread2, thread3: TThread; | |
| sw : TStopWatch; |
JordiCorbilla
/ CaptureConsoleOutput.pas
Last active
December 5, 2019 10:40
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /** | |
| * @Author: Jordi Corbilla | |
| * (c) Copyright by Jordi Corbilla. | |
| **/ | |
| //Anonymous procedure approach by Lars Fosdal | |
| type | |
| TArg<T> = reference to procedure(const Arg: T); | |
| procedure TForm1.CaptureConsoleOutput(const ACommand, AParameters: String; CallBack: TArg<PAnsiChar>); | |
| const |