Skip to content

Instantly share code, notes, and snippets.

Lars Fosdal LarsFosdal

Block or report user

Report or block LarsFosdal

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@LarsFosdal
LarsFosdal / FDC.CommandLine.pas
Last active Aug 9, 2019
FDC Generic Command Line Parser for Delphi 10.3.x
View FDC.CommandLine.pas
unit FDC.CommandLine;
/// <summary>
/// Written by Lars Fosdal, August 2019, Delphi 10.3.1
/// Your license to use and modify follows the Attribution-ShareAlike 4.0 International (CC BY-SA 4.0) license rules.
/// https://creativecommons.org/licenses/by-sa/4.0/
/// </summary>
interface
uses
@LarsFosdal
LarsFosdal / EnumArrayvsEnumSet.dpr
Created Feb 18, 2019
Delphi pitfalls: Enumerated types and for loops
View EnumArrayvsEnumSet.dpr
program EnumArrayvsEnumSet;
{$APPTYPE CONSOLE}
{$R *.res}
uses
System.SysUtils;
type
TEnum = (plough, foo, bar, wtf);
@LarsFosdal
LarsFosdal / MODBUS.PAS
Created Jul 3, 2017
Ancient Generic PLC wrapper code and Modbus implementation.
View MODBUS.PAS
{$I CODEDEFS.PAS} {Include code generation definitions}
{DEFINE Debug}
UNIT ModBus; {.3 (c) 19880812 Lars Fosdal}
{----------------------------------------------------------------------------}
{ Short System Description }
{----------------------------------------------------------------------------}
{
Source : Turbo Pascal v.4.0
Author : Lars Fosdal
You can’t perform that action at this time.