Straßenbahn: Gelenktriebwagen G4-65 des VEB Waggonbau Gotha vom 14.01.2007
Für einen Wettbewerb suche ich nach etwas was selten modelliert wurde. So kam ich auf die Gothabahn. In diesem Fall die G4-65 eine Gelenkstraßenbahn.
...weiter lesen
Für einen Wettbewerb suche ich nach etwas was selten modelliert wurde. So kam ich auf die Gothabahn. In diesem Fall die G4-65 eine Gelenkstraßenbahn.
Hier einmal meine Matheunit in Delphi:
Diese unit sammelt einige Funktionen zum Manipulieren von fremden Fenster in Delphi.
Delphi/Pascal function my_wh_getWinhandle(titel:string;starthandle:hWnd):hWnd;
//suche nach genau dem Fenstertitel oder der erste in dem der String vorkommt
var my_wh_strickt:boolean=true;
//Übergabe: Fenstertitel des zu bearbeitenden Programmes und Starthandel ab dem es zu suchen gild
function my_wh_moveWin(x,y:integer;wintitel:string;starthandle:hWnd): boolean;
function my_wh_resizeWin(b,h:integer;wintitel:string;starthandle:hWnd): boolean;
function my_wh_sendKeytoapp(key:integer;wintitel:string;starthandle:hWnd): boolean;
//Schließe Programm, Übergabe Fenstertitel
procedure my_wh_closeProgs(titel:string;starthandle:hWnd);
//Fenster eines Programmes in ein Objekt (Fenster/Panel) einfangen, freigeben
function my_wh_catchWindow(Winhandle:hWnd;zielHandle:thandle;maximize:boolean): boolean;
//Fenster verstecken/anzeigen, Übergabe Handle
procedure my_wh_hideProg(win:THandle);
Anbei ein Programm mit Quellen, welches die Umleitung von DOS-Befehlen in eine Textbox mit Delphi zeigt.
Basis ist dafür der Befehl GetConsoleOutput.
Delphi/Pascalfunction GetConsoleOutput(const Command: String; var Output, Errors: TStringList): Boolean;
Mit Command gibt man das DOS-Kommando. Output und Errors sind zwei vorher definiert Stringlisten die die Rückgaben des Dos-Kommandos erhalten.
Projektfile: dosumleitung.rar (Delphi 3; 92,1KB)
Meine Sammlung zum Thema LAN für Delphi:
Bilder im Internet Explorer 6 kann man mit folgendem Meta-Tag das over-Bilder-Menü verhindern.
<meta http-equiv="imagetoolbar" content="no">