mmmunk

// Very basic Windows Service template - maybe not fully correct/complete but it works.

// x86_64-w64-mingw32-gcc -mwindows -municode -O2 -s -o TempLoggerService.exe TempLoggerService.c
// SC create TempLoggerService binpath="C:\Temp\TempLoggerService.exe"
// SC delete TempLoggerService

#include <windows.h>
#include <stdio.h>

#define SERVICE_NAME L"TempLoggerService"

mmmunk

# Reads a directory of picture files and creates a single-file HTML-document including all the pictures as Base64 data inside the document

import sys
import os
import io
import math
import base64
from PIL import Image, UnidentifiedImageError

# ---------- TagBuilder ----------

mmmunk

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

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

// 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

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

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

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

sudo apt install gcc-mingw-w64-x86-64

mmmunk

type
  TRefCountObject = class(TObject)
  protected
    ExtraReferencesCount: Integer;  { Default 0 }
  public
    procedure Free;
    function GetReference: TRefCountObject;
  end;

procedure TRefCountObject.Free;

mmmunk

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;