發表文章

目前顯示的是 11月, 2021的文章

Animated 3D Models 3d file obj fbx dae stp prt stl WRL blend

 Animated 3D Models 3d file obj fbx dae stp prt stl WRL blend 3D File Format: 10 Most Popular Types for Different Software https://cgifurniture.com/3d-file-format-10-types/ http://edutechwiki.unige.ch/en/3D_file_format Essential Guide to 3D File Formats https://www.marxentlabs.com/3d-file-formats/ https://all3dp.com/1/best-20-3d-animation-software/ Model file formats - Unity - Manual  https://docs.unity3d.com/Manual/3D-formats.html

Netty is a non-blocking I/O client-server framework for the development of Java network applications

socket cache server layer Socket Server listen thread extends  ServerSocket Socket listen accept connect identifier Multiple Connection inetd (internet service daemon) is a super-server daemon on many Unix systems that provides Internet services. For each configured service https://en.wikipedia.org/wiki/Inetd TCP Wrappers (also known as tcp_wrappers) is a host-based networking ACL system, used to filter network access to Internet Protocol servers https://en.wikipedia.org/wiki/TCP_Wrappers xinetd (Extended Internet Service Daemon) is an open-source super-server daemon which runs on many Unix-like systems and manages Internet-based connectivity https://en.wikipedia.org/wiki/Xinetd iptables是運行在使用者空間的應用軟體,通過控制Linux核心netfilter模組 https://en.wikipedia.org/wiki/Iptables iptables is a command-line firewall utility ipchains  firewall Syslog Daemons, Message Formats and Protocols syslog daemon is a server process that provides a message logging getpeername() — Get the name of the peer co...

mechanical algorithm skeletal linkage detected simulator collision

https://en.wikipedia.org/wiki/Linkage_(mechanical)

ECMAScript and WebAssembly, JavaScript WebAssembly SIMD Chrome OpenCV.js

https://v8.dev/  V8 is Google’s open source high-performance JavaScript and WebAssembly engine, written in C++. It is used in Chrome and in Node.js, among others. It implements ECMAScript and WebAssembly , and runs on Windows 7 or later, macOS 10.12+, and Linux systems that use x64, IA-32, ARM, or MIPS processors. V8 can run standalone, or can be embedded into any C++ application.   https://github.com/WebAssembly/simd/tree/master/proposals/simd

JavaScript programs from within a Delphi app

 JSKit https://github.com/eugenekryukov/jskit Evaluate JavaScript programs from within a Delphi app, and support JavaScript scripting of your Delphi app. JavaScriptCore based framework.   3rd-Party Development Guide https://www.crossvcl.com/tlist.html

Castle Game Engine - Coming to Delphi!

 castle-engine https://castle-engine.io/wp/ Castle Game Engine from DelphiCon  https://github.com/castle-engine/castle-engine https://delphicon.embarcadero.com/talks/castle-game-engine-coming-to-delphi/  https://wiki.lazarus.freepascal.org/Choosing_a_Game_Engine http://www.zgameeditor.org/ https://www.pascalgamedevelopment.com/content.php http://www.clootie.ru/ https://delphigl.com/ https://sourceforge.net/projects/andorra/ https://castle-engine.io/ http://zengl.org/ https://asphyre.net/ https://en.wikipedia.org/wiki/GLScene ------ https://en.wikipedia.org/wiki/Graphics32 Image32 - A 2D graphics library for Delphi Clipper 6.4.0 - NuGet LazRGBGraphics http://wiki.freepascal.org/LazRGBGraphics BGRABitmap http://wiki.freepascal.org/BGRABitmap AggPas http://www.crossgl.com/aggpas/ fpVectorial http://wiki.freepascal.org/fpvectorial Andorra 2D http://andorra.sourceforge.net/ Graphics32 http://graphics32.org http://allegro-pas.sourceforge.net/ https://imaginglib.sourceforge.io/...

animation spriters resource Game Engines

 https://instabug.com/ https://wiki.gdevelop.io/gdevelop5/tutorials/resources   animation spriters resource  https://www.spriters-resource.com/ Animated Sprite QML Type SpriteSequence Game Engines Unreal Engine Unity Godot Engine CryEngine Crytek CryEngine 3.8.1 Amazon Lumberyard AppGameKit AppGameKit Classic Cocos2d-x Pyglet pygame SDL Simple DirectMedia Layer Lib MonoGame C#  .NET Foundation. ShiVa Engine  Web Player (browser plugin) available HeroEngine Godot Engine - Free and open source 2D and 3D game engine Pyxel Edit https://pyxeledit.com/ Qubicle https://www.minddesk.com/ ProBuilder https://unity.com/features/probuilder Adobe Animate ----- Ogre3d https://www.ogre3d.org/ Power VR Ray Tracing PowerVR SDK and Tools including ray tracing Torque 3D http://www.garagegames.com/products/torque-3d   Game Graphics Tools Spine http://zh.esotericsoftware.com/ *** Aseprite - Animated sprite editor & pixel art tool https://www.aseprite.org/ Beast Autodesk Gam...

delphi Direct3D 9 Material HLSL 反射

 https://github.com/LUXOPHIA/MyAsset  System.Types, System.Classes, System.Math.Vectors, FMX.Types3D, FMX.Controls3D, FMX.MaterialSources,   MyModel と MyMaterial の統合プロジェクト。 独自のシェーダを HLSL で記述することにより、 フレネル反射 による鏡面反射/屈折の表現と、 法線マッピング による凸凹表現を実現。RGB毎に異なる屈折率を設定することで、簡易な 分散 表現に対応できる他、屈折率を大きくすることで光の透過しない金属の質感も表現できる。    https://docs.unrealengine.com/4.27/ja/RenderingAndGraphics/Materials/HowTo/Refraction/   屈折率 すなわち IOR (Index of Refraction) は、光学単位であり、光がある媒質から別の媒質に伝搬するときにどの程度曲がるかを正確に表します。 この光の現象は測定可能であるため、こうした光学単位                              

delphi啟動外部程式執行結束 啟動外部程式 Winexec ShellExecute

 delphi啟動外部程式執行結束 啟動外部程式 Winexec ShellExecute  Winapi.ShellAPI Winapi.Windows  ShellExecute CreateProcess  ShellExecuteEx WaitForSingleObject delphi shellexecuteex SW_SHOWNORMAL  TShellExecuteInfo    WaitForSingleObject(ShExecInfo.hProcess,INFINITE);  GetExitCodeProcess(ExecInfo.hProcess,ExitCode);  createprocessasuser  https://www.codeproject.com/Articles/19165/Vista-UAC-The-Definitive-Guide Link_Create() Link_CreateAsUser() Link_CreateWithLogon() Link_CreateWithToken() Link_Destroy() Link_CreateProcessA() Link_CreateProcessW() Link_ShellExecuteExA() Link_ShellExecuteExW() Link_ShellExecuteA() Link_ShellExecuteW() Link_LoadLibraryA() Link_LoadLibraryW() Link_SendData() Link_GetData() Link_SendFinalize() CreateProcessElevatedA() CreateProcessElevatedW() CreateProcessAsUserElevatedA() CreateProcessAsUserElevatedW() CreateProcessWithLogonElevatedW() CreateProcessWithTokenElevatedW() SH_RegCreateKeyExElevatedA() SH_RegCreateKeyExElevat...

restful json datasnap scalable multi-tier frameworks delphi

  NetHTTP TNetHTTPClient  TNetHTTPRequest  REST TRESTClient TRESTRequest TRESTResponse TRESTResponseDataSetAdapter  Indy IdHTTP IdSSLOpenSSL  JavaScript jQuery(Mobile Http DOM Ajax JavaScript RESTful REST web service API    DataSnap REST server HTML5 client    REST Services TRESTClient TRESTRequest TRESTResponse components  System.DateUtils,System.SyncObjs, System.Math,  System. Generics.Collections,  System.Rtti, System.Bindings.Outputs,  System.JSON,  System.JSON.Builders, System.JSON.Readers,   FMX.Types, FMX.Forms, FMX.Dialogs, FMX.Layouts,   FMX.Objects, FMX.ListBox, FMX.Ani, FMX.Gestures, FMX.StdCtrls,   FMX.DateTimeCtrls, FMX.Graphics,   FMX.Media, FMX.ScrollBox, FMX.Memo, FMX.Calendar, FMX.Edit,   FMX.Controls, FMX.Controls.Presentation,   FMX.TreeView, FMX.TabControl,     REST.Utils,   REST.Types,   REST.Client,   REST.Response.Adapter,   REST.Authen...

Streaming restoring components DFM panel stream savetofile delphi

https://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TReader InsertComponent RegisterClasses ObjectTextToBinary  ReadComponent WriteComponent  VclRtl ReadComponentRes   WriteComponentRes       TFileStream  – 處理文件。     TStringStream - 內存中的字符串操作。     TMemoryStream - 使用內存緩衝區。     TWinSocketStream - 通過套接字連接讀取和寫入。     TOleStream - 使用 COM 接口進行讀寫。 TBufferedFileStream TMemoryStream 是一種在動態內存中存儲數據的流。 TWinSocketStream 是一個流,它為應用程序提供讀寫套接字連接的服務。 TOleStream 通過 OLE 對象提供的流接口來讀寫信息。TActiveXControl System.BlockWrite - RAD Studio API Documentation https://docwiki.embarcadero.com/RADStudio/Sydney/en/Structured_Types_(Delphi) Standard Routines and Input-Output https://docwiki.embarcadero.com/RADStudio/Sydney/en/Standard_Routines_and_Input-Output System.TTextRec https://docwiki.embarcadero.com/Libraries/Sydney/en/System.TTextRec System.SysUtils.TSearchRec Using the Eof and Bof Properties System.TFi...

ClientDataSet BLOB Binary Large Object TBlobField

 ClientDataSet  BLOB Binary Large Object   TBlobField uses IOUtils, MMSystem;   MediaPath, Path: string;   with ClientDataSet1 do begin     FieldDefs.Add('WavFileName', ftString, 32);     FieldDefs.Add('WAV', ftBlob);     CreateDataSet;     MediaPath := GetEnvironmentVariable('SystemRoot') + '\Media\';   for Path in TDirectory.GetFiles(MediaPath, '*.wav') do     ClientDataSet1.Append;     ClientDataSet1['WavFileName'] := ExtractFileName(Path);     TBlobField(ClientDataSet1.FieldByName('WAV')).LoadFromFile(Path);   ClientDataSet1.MergeChangeLog;     BlobStream: TClientBlobStream;   BlobField: TBlobField;   BlobField := ClientDataSet1.FieldByName('WAV') as TBlobField;   BlobStream := TClientBlobStream.Create(BlobField, bmRead);   Win32Check(PlaySound(BlobStream.Memory, 0, SND_SYNC or SND_MEMORY));   BlobStream.Free; ...

Writing large Database applications in Delphi

 https://www.freepascal.org/~michael/articles/     Writing large Database applications in Delphi Writing large Database applications in Delphi: Part 2 Large Database applications in Delphi - Part 3: Extending TForm   Large Database applications in Delphi - Part 4: Extending TDataset

delphi GLibWMI MiTeC WMI Delphi Code Creator robvanderwoude wmigen Windows Management Instrumentation

  delphi GLibWMI  MiTeC  WMI Delphi Code Creator robvanderwoude wmigen Windows Management Instrumentation https://www.delphipraxis.net/1351685-post14.html (*  SysUtils, ActiveX, ComObj, Variants;  *)   Winapi.Windows,   System.SysUtils,   Winapi.ActiveX,   System.Win.ComObj,   System.Variants;   const   WbemUser ='';   WbemPassword ='';   WbemComputer ='localhost';   wbemFlagForwardOnly = $00000020; var   FSWbemLocator : OLEVariant;   FWMIService : OLEVariant;   FWbemObjectSet: OLEVariant;   FWbemObject : OLEVariant;   oEnum : IEnumvariant;   iValue : LongWord; begin;   FSWbemLocator := CreateOleObject('WbemScripting.SWbemLocator');   FWMIService := FSWbemLocator.ConnectServer(WbemComputer, 'root\CIMV2', WbemUser, WbemPassword);   FWbemObjectSet:= FWMIService.ExecQuery('SELECT * FROM CIM_PhysicalMemory','WQL',wbemFlagForwardOnly);   oEnum := IUnknown(FWbemObjectSe...

Delphi EmbeddedWB WebBrowser interpreter

  FIREFOX Mozilla firefox en Gecko runtimes delphi  Universal Component Library UWP controls JS electron-builder  https://github.com/electron-userland/electron-builder   Delphi-EmbeddedWB  https://github.com/ghquant/Delphi-EmbeddedWB https://sourceforge.net/projects/embeddedwb/   How to call Delphi code from scripts running in a TWebBrowser http://www.delphidabbler.com/articles/article-22 DELPHI WEB BROWSER BASED Cross-Platform New VCL TEdgeBrowser Component Coming RAD Studio 10.4 Microsoft Edge WebView2

delphi DIB embarcadero delphi graphics TBitmap Vcl.Graphics.GetDIB Device Independent Bitmaps BitBlt CreateCompatibleDC SelectObject CreateCompatib GetMapMode CreateCompatibleBitmap CreateDIBSection

  BitBlt CreateCompatibleDC SelectObject CreateCompatib GetMapMode  CreateCompatibleBitmap CreateDIBSection Drawing Transparent Bitmaps http://delphi.cjcsoft.net//viewthread.php?tid=45232 Title: Drawing Transparent Bitmaps Question: How to draw a transparent bitmap      hdcTemp := CreateCompatibleDC(dc);    SelectObject(hdcTemp, hBmp);   // Select the bitmap    GetObject(hBmp, sizeof(BITMAP), @bm);    ptSize.x := bm.bmWidth;            // Get width of bitmap    ptSize.y := bm.bmHeight;           // Get height of bitmap    DPtoLP(hdcTemp, ptSize, 1);        // Convert from device                                ...

delphi Navigation Sidebar LIST MENU

 delphi Navigation Sidebar LIST MENU Show and Hide Transient Content in Your VCL UI Using TSplitView and C++Builder  TSplitView TCategoryButtons TButtonCategory  TButtonItem TCategoryPanelGroup TCategoryPanel TCategoryButtons  TActionMainMenuBar JVCL's TJvNavigationPane TJvOutlookBar  TJvNavigationPane  TreeViewToMenu TSearchBox TSplitView TDockTabSet TFlowPanel TControlList MS Ribbon Control  ActionManager TreeControl Virtual Treeview VirtualTrees  STYLE https://docs.microsoft.com/en-us/windows/win32/controls/tree-view-controls Navigator Container http://docplayer.net/77223250-Windows-controls-last-part.html

MVVM Delphi Architecting Building Model

 MVVM Delphi Architecting Building Model LiveData ViewModel https://blog.grijjy.com/2018/01/22/mvvm-starter-kit-part-1-of-3/ MVVM Starter Kit (Part 1 of 3) https://github.com/grijjy/GrijjyFoundation https://github.com/grijjy/MvvmStarterKit https://www.youtube.com/watch?v=Ci1HP8ZBJxk&ab_channel=EmbarcaderoTechnologies http://www.malcolmgroves.com/blog/?p=1340 https://bitbucket.org/sglienke/dsharp/src/master/ https://blog.grijjy.com/2018/01/24/mvvm-starter-kit-part-2-of-3/

TDirect2DCanvas delphi source code game

Direct3D9.pas DirectInput.pas DirectDraw.pas DirectSound DirectMusic, D2D1.pas JEDI_Code_Library Windows Media Format 9 API (WMF9.pas) Prodigy Math Game Wincodec.pas (podpora TWICImage a tím i třeba Tiff, CR2 a NEF grafické formáty)     cor.pas (.NET unmanaged compiler API - cor.h)     OpenGL.pas     Manipulations.pas - Manipulation SDK       rtti.pas - nové Run Time Type Information     IOUtils.pas - OOP přístup k souborům     Diagnostics.pas - TStopWatch (někdy příště) "RAD Studio\7.0\source\Win32\vcl\":     Direct2D.pas Direct2D API z Windows 7 (Vista), tj. TDirect2DCanvas     Gestures.pas, GestureMgr.pas, GestureCtrls.pas - Gestures     Keyboard.pas, KeyboardTypes.pas - Klávesnice pro touch https://delphi.cz/2010/02/default.aspx https://windwings.wordpress.com/2009/08/13/rad-studio-2010-review-8-and-now-some-feedback-from-us/ https://delphi.cz/p...

Can Delphi insert Excel 2007/2010 table

  1) Delphi has no support for any Excel natively. It is all done with hands-tuned OCX import, and you can make your own import any time you need it! Delphi Menu: Component / Import COmpionent / Type Library / excel.exe 2) but if you talk about Delphi XE2 it containsthat hand-tuned c:\RAD Studio\9.0\OCX\Servers\pas2010\Excel2010.pas for you And thus Delphi has 3 design-time packages for you: c:\RAD Studio\9.0\bin\dcloffice 2010 160.bpl c:\RAD Studio\9.0\bin\dcloffice 2K 160.bpl c:\RAD Studio\9.0\bin\dcloffice xp 160.bpl https://winsoft.sk/officecs.htm  https://sourceforge.net/directory/?q=delphi%20excel%20components https://torry.net/pages.php?id=551 Delphi Easy Excel 基礎類別設計http://grandruru.blogspot.com/2020/03/delphi-easy-excel.html https://edn.embarcadero.com/article/40813 https://delphi.fandom.com/wiki/3rd_Party_Components https://github.com/sergio-hcsoft/Delphi-SpreadSheets

Regex library for Delphi

 https://github.com/shukomiya/skregexp   shukomiya/skregexp: Regex library for Delphi 2005 later https://github.com › shukomiya › skregexp   Regex library for Delphi 2005 later. Contribute to shukomiya/skregexp development by creating an account on GitHub. ・ SKRegExp Trainer  "Delphi 2005 以降で利用可能な SkRegExp (小宮さん作  SkRegExp   https://ht-deko.com/tech053.html#DFMCONV ・ PerlRegExp Trainer  Delphi XE から標準搭載された TPerlRegEx ・ VBSRegExp Trainer  VBScript の TRegExp (正規表現クラス) の練習ツールです。 ・ RegularExpressions Trainer SkRegExp / PerlRegEx / VBSscript / RegularExpressions (FMX) 版すべて同じアーカイブ内に入っています。 VBScript 版は、他の 2 つと同じような動作にするために場当たり的な手法を採っています。 あまり参考にしないで下さい&ちゃんとした使い方は Mr.XRAY さんとこの記事 を参考にして下さい。 VBScript 版をコンパイルするためには、タイプライブラリの取り込み ("Microsoft VBScript Regular Expressions 5.5") が必要です。 SkRegExp / VBSscript 版は Delphi 2009 以降でコンパイルできると思います。 PerlRegEx 版は Delphi XE 以降ですが、 TPerlRegEx を別途 DL すれば Delphi 2009 以降 RegularExpressions (FMX) SkRegularExpressions / RegularExpressions...

Excel Creator Ver3.0 ( アドバンスソフトウェア製 )

 http://mrxray.on.coocan.jp/Delphi/plXLSOut/index.htm   Excel 出力コンポーネント   Excel Creator Ver3.0 ( アドバンスソフトウェア製 ) ExcelCreator Ver3.0 は,ExcelCreator 2007 に収録されている製品 http://mrxray.on.coocan.jp/Delphi/plExcelEx/index.htm エクセル操作フォームEx  

Microsoft Office Document Imaging (MODI) OCR

  Microsoft Office Document Imaging (MODI)  OCR regsvr32.exe mdivwctl.dll, MDIVWCTL.DLL is part of MS office 2003. OCR MODI Library (MDIVWCTL.DLL) is freely available regsvr32.exe "C:\Program Files\Common Files\Microsoft Shared\MODI\11.0\mdivwctl.dll" OFFICE2007 Files\Common Files\Microsoft Shared\MODI\12.0 MDIVWCTL.dll C:\Program Files\Common Files\Microsoft Shared\MODI\11.0, 21MB Install MODI for use with Microsoft Office https://support.microsoft.com/en-us/topic/install-modi-for-use-with-microsoft-office-2010-4fbd3076-6d01-9cb7-c574-3bbabc9eead9 Microsoft Office Document Imaging 11.0 Type Library CreateObject("MODI.Document")     miDoc.Images(0).OCR miLANG_CHINESE_SIMPLIFIED, True, True '  strLayoutInfo = _         "Language: " & modiLayout.Language & vbCrLf & _         "Number of characters: " & modiLayout.NumChars & vbCrLf & _      ...

“delphi how t o declare function” Code Answer

 interface type   TNodeFunction = function(AInput: String): String; implementation function Func1(AInput: String): String; begin    result := AInput; end; function Func2(AInput: String): String; begin    result := 'Fooled You'; end; function Func3(AInput: String): String; begin    result := UpperCase(AInput); end; procedure Demonstration; var   SomeFunc, SomeOtherFunc: TNodeFunction; begin      SomeOtherFunc = Func3;      SomeFunc := Func1;      SomeFunc('Hello');   // returns 'Hello'      SomeFunc := Func2;      SomeFunc('Hello');   // returns 'Fooled You'      SomeOtherFunc('lower case'); // returns 'LOWER CASE' end;

get current method's name

  JclDebug.pas function FileByLevel(const Level: Integer = 0): string; function ModuleByLevel(const Level: Integer = 0): string; function ProcByLevel(const Level: Integer = 0): string; function LineByLevel(const Level: Integer = 0): Integer;

GetEIP

  uses System . Classes , System . SysUtils , System . Rtti ; procedure GetEIP(); stdcall; function GetCurrentFuncName (const frm: TObject) : string ; implementation var g_CurrentFuncEIP: NativeUInt; procedure GetEIP(); stdcall; asm {$IFDEF WIN32} POP EAX; MOV g_CurrentFuncEIP,EAX; PUSH EAX; {$ELSE} POP RAX; MOV g_CurrentFuncEIP,RAX; PUSH RAX; {$ENDIF} end; function cmpint (List: TStringList; Index1, Index2: Integer) : Integer ; begin Index1 := StrToIntDef( List [Index1], 0 ); Index2 := StrToIntDef( List [Index2], 0 ); Result := Index1 - Index2; end; function CheckEIP (const intEIP: Cardinal; const frm: TObject) : string ; type PMethodInfo = ^TMethodInfo; TMethodInfo = record strAddress: ShortString; strFunName: ShortString; end; var rc : TRttiContext; rt : TRttiType; rm : TRttiMethod; sl : TStringList; pmi : PMethodInfo; intIndex: Integer; III : Integer; begin rc := TRttiContext.Create; sl := TStringList.Create; try sl.Sorted := Fals...

DELPHI 官網 範例

DELPHI  官網 範例 Complete List of Delphi Code Examples From Docwiki   https://capecodgunny.blogspot.com/2013/07/complete-list-of-delphi-code-examples.html