Skip to content

Instantly share code, notes, and snippets.

View mmmunk's full-sized avatar

Thomas Munk mmmunk

0 followers · 1 following
View GitHub Profile
@mmmunk
mmmunk / Client.dpr
Last active March 25, 2020 17:03
Base principles for Indy Server and Client in Delphi (with extra clients in other frameworks too)
program Client; {$APPTYPE CONSOLE}
uses
Windows, SysUtils, IdTCPClient;
var
TcpClient: TIdTCPClient;
S: string;
begin
@mmmunk
mmmunk / RunProcessAndCaptureOutput.pas
Last active May 14, 2018 11:28
Delphi procedure to run an external command line program and capture and display the output.
procedure RunProcessAndCaptureOutput(const CmdLine: string; Memo: TMemo; HideLinesCount: Integer = 0);
var
SecAttr: TSecurityAttributes;
PipeR, PipeW: THandle;
StartupInfo: TStartupInfo;
ProcessInfo: TProcessInformation;
Buffer: packed array[0..4096-1] of AnsiChar;
Count: Cardinal;
S, Leftover: AnsiString;
i, P: Cardinal;
@mmmunk
mmmunk / RefCountObject.pas
Created September 21, 2018 07:41
type
TRefCountObject = class(TObject)
protected
ExtraReferencesCount: Integer; { Default 0 }
public
procedure Free;
function GetReference: TRefCountObject;
end;
procedure TRefCountObject.Free;
@mmmunk
mmmunk / C compiler for Windows on Ubuntu.md
Last active September 4, 2020 13:29

Command 'x86_64-w64-mingw32-gcc' not found, but can be installed with:

64-bit exe: sudo apt install gcc-mingw-w64-x86-64

32-bit exe: sudo apt install gcc-mingw-w64-i686

@mmmunk
mmmunk / RubberExample.cs
Last active February 13, 2019 13:46
C# .NET apps without Visual Studio
using System;
using System.Drawing;
using System.Windows.Forms;
public class RubberExample : Form {
bool mouseDown = false;
Point mouseDownPoint = Point.Empty;
Point mousePoint = Point.Empty;
@mmmunk
mmmunk / MariaDB test-server.txt
Last active October 23, 2020 08:30
Nem opsætning af simpel/slank MariaDB test-server på Windows
Nem opsætning af simpel/slank MariaDB test-server på Windows
------------------------------------------------------------
Hent seneste stable MariaDB til Windows
(ZIP-fil uden debug-symbols, ikke MSI)
fra https://downloads.mariadb.org/
Der oprettes en valgfri rod-mappe
@mmmunk
mmmunk / helper.c
Created February 19, 2019 10:49
Example of creating and using a Windows DLL with MinGW
// x86_64-w64-mingw32-gcc -Wall -shared -O2 -s -o helper.dll helper.c
#include <stdio.h>
#include <string.h>
__declspec(dllexport) __stdcall int proc_sql_modify(char *sql, int size) {
strcpy(sql, "NEW SQL HERE");
return 0;
}
@mmmunk
mmmunk / Create.txt
Created May 24, 2019 08:36
64-bit WAMP (Windows, Apache, MariaDB/MySQL, PHP) til udvikling/test
64-bit WAMP (Windows, Apache, MariaDB/MySQL, PHP) til udvikling/test
====================================================================
Webserver med PHP
-----------------
Opret C:\WAMP
Opret C:\WAMP\www
Download nyeste Apache binary (httpd 2.4) VC15 Win64 fra https://www.apachelounge.com/download/
@mmmunk
mmmunk / WindowsBatchTipsTricks.cmd
Last active October 23, 2019 09:44
Tips & Tricks for Windows Batch files
REM This file is not meant to be run in it's entirety
REM --- Check if script is run as administrator
net session >nul 2>&1
if %errorlevel% neq 0 (
echo This script must be run with administrator privileges
pause
exit /B
)
@mmmunk
mmmunk / image2data.sh
Last active April 12, 2021 11:39
Reads a directory of picture files and creates a single-file HTML-document including all the pictures as Base64 data inside the document
#!/bin/bash
echo -n "data:"`file --mime-type --brief $1`";base64,"`base64 --wrap=0 $1` >`realpath $1`".b64"