Winapi: Test bitblt

Bitblt (destdc: HDC; {Target DC} X, Y, width, height: integer; {target location and size} srcdc: HDC; {source DC} xsrc, ysrc: integer; {source start position} drop: DWORD {grating operation code, that is, the method of mixing the source pixel with

Delete or add the maximize or minimize button-reply to the "Tommy the cat" question

Problem Source: http://www.cnblogs.com/del/archive/2008/07/02/1202871.html#1242042 In this example: CodeFile: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type

Use of Delphi streaming (10): compression and decompression progress-Reply to "ilst"

Problem Source: http://www.cnblogs.com/del/archive/2008/08/02/1022539.html#1275599 This example is modified on the basis of this example: http://www.cnblogs.com/del/archive/2008/01/01/1022539.html In this example: Code

Example of getting started with classes (5): override

Unit unit1; interfaceuses classes, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender: tobject); end; tbase = Class procedure proc1; virtual; Procedure proc2; end; tchild = Class (tbase)

Start with GDI +

This is the previous content. Http://www.cnblogs.com/del/archive/2008/06/06/1215319.htmlStart! Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs; Type tform1 = Class (tform) Procedure

Winapi: getmodulefilename and getmodulehandle

Unit unit1; interfaceuses windows, messages, extensions, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; Procedure formcreate (Sender: tobject); Procedure button1click (Sender: tobject);

Learn the official example-tapplication. icon

This example also contains some usage of the topenpicturedialog control. Code File: unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, extdlgs, stdctrls; type tform1 = Class (

Learn the official example-tapplication. onexception

This example demonstrates global exception capture and handling, and simulates and inspires an exception. After compilation, run the generated Program File... In this example: Code File: Unit unit1; interfaceuses windows,

Winapi: findwindow, find1_wex-search window

Findwindow (lpclassname, {Class Name of the window} lpwindowname: pchar {Title of the window}): hwnd; {handle of the returned window; returns 0} // find1_wex, which has two more handle parameters than findwindow: find1_wex (parent: hwnd; {the parent

Using GDI to operate EMF files [2]: playenhmetafile, deleteenhmetafile

Create an EMF file and draw it in the form. Unit unit1; interfaceuses windows, messages, extensions, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 = Class (tform) button1: tbutton; Procedure button1click (Sender:

Winapi: setpaiwextex, setviewportextex

Similar functions: scaleappswextex and scaleviewportextex In this example: Code File: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, comctrls, stdctrls; Type

Winapi: offset+worgex-mobile window coordinate origin

Related functions: offsetviewportorgex In this example: Code File: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls, comctrls, extctrls; Type tform1 =

Reply to a type conversion question in "timer008"-not very typical and of little value to others

Problem Source: http://www.cnblogs.com/del/archive/2008/07/10/1239621.html#1250359 CodeFile: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls; Type tform1 =

Winapi: offsetcliprgn, ptvisible

Offsetcliprgn: Move the cut area; ptvisible: determines whether the point is in the cut area. In this example: Code File: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms,

Obtain the program path based on the window handle-Reply to "Haiwen"

Problem Source: http://www.cnblogs.com/del/archive/2008/07/30/1255869.html#1272342 In this example: Code File: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs,

How to make the close button of the window (and the MDI sub-window) dimmed-reply "dream come true"

Problem Source: http://www.cnblogs.com/del/archive/2008/06/14/1221980.html#1225922 // In this way, the close button of the current window will be grayed out, but there will be a redundant line var H: hmenu; begin H: = getsystemmenu (handle,

How to get the coordinates of the current mouse position-Reply to "ps8.0"

Problem Source: http://www.cnblogs.com/del/archive/2008/06/14/1218771.html#1225859 Code File: Unit unit1; interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs; Type tform1 = Class (tform)

Complex structured access (1)

The reason for complexity is that it differs from the previously mentioned structured file access. Such complex structured files are also called "Composite documents ". Some documents are not structured, such as NotePad files. Structured files

Operating EMF files with GDI [7]: graphic commands in enumenhmetafile and playenhmetafilerecord-enumeration files

Enumenhmetafile (DC: HDC; {target device handle; if the callback function does not require playback, this parameter is 0} EMF: henhmetafile; {metadata file handle} enhmetafunc: tfnenhmfenumproc; {callback function pointer; For the callback function

Use the hook function [5]-Data Transmission

The core difficulty of Boyou Peng's letter on hook is how to transmit the data in DLL, which will be discussed in the following two examples. In this example, a global mouse hook is created, and the mouse information is passed to the program that

Total Pages: 64722 1 .... 54252 54253 54254 54255 54256 .... 64722 Go to: GO

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.