CorelDRAW Step-by-Step Graphic Design Tutorials | CorelDRAW
Looking for:
CorelDRAW X7 Tutorials - Corel Discovery Center.Coreldraw technical suite x7 tutorial free.Creating VBA Macros with User Interface in CorelDRAW and Corel DESIGNER
All rights reserved. The content herein is in the form of a personal techncal log "Blog" or forum posting. As such, the views coreldrww in this site are those of the participants and do not necessarily reflect the views of Corel Corporation, or its affiliates and their respective officers, directors, employees and agents.
Site Search User. Developer Area. Coreldraw technical suite x7 tutorial free Area requires membership for participation - click to join. Creating Color Palettes. Storing Custom Information in Documents. This article walks the user through the steps of creating a simple Image Resizer macro which takes images from a specified folder, opens them in Corel PHOTO-PAINT, resizes them to fre dimensions and saves them to a different folder. The macro project will contain a tutoroal macro that shows a tutoriial box which allows the user to enter the location of images to process, required dimensions and the output folder.
First create a new macro project for Image Resizer macro. This will create a new macro project called ImageResizer. Sub Start. MsgBox "Hello, world! End Нажмите для деталей. Now the basic macro project is set up. Note the Properties docker in VBA shows coreldraw technical suite x7 tutorial free customization options for the user form.
For example, the Caption property specifies the text shown in the title bar of the form. Now you can run the macro to see how the sjite dialog box looks like. Toolbox in VBA form editor contains all the user controls currently available:. The toolbox contains the following controls: text label, textbox, combobox, listbox, checkbox, radio button, toggle button, group box, command button, tab strip, multipage control, scroll bar, spin button, image.
More controls can be added to the frew from third-party control libraries. To add a control to a form, just drag the control out of toolbox and drop it onto the form at the desired location. Once dropped onto the form, controls can ждали adobe flash cs4 professional portable free статью selected, moved and resized just like objects in CDGS applications.
Clicking an already-selected control allows to edit the contents of the control e. Place label controls, text boxes, command buttons and the checkbox as shown in the following screenshot:. When a control is selected, you can also give it a more descriptive name to identify the control in the macro code, because the automatic generated control names such as TextBox1 and Label2 are not very descriptive.
The following controls are used in the form, including their tecchnical and name left-to-right and top-to-bottom :. Control Type. However you will notice that clicking any buttons has no effect because there is no code written to specify what should happen when a button is clicked. This can be done cpreldraw by double-clicking a command button in VBA form designer.
This will open cogeldraw code window for the user form and add an event handler for mouse click for cmdResize control:. MsgBox "Button clicked". Now implement the Browse buttons for source and destination folders. You can just copy that code directly from that macro into your own. Select and drag it into the ImageResizer project:.
This will copy the FolderPicker module to ImageResizer and its code can now be used inside our macro too. Add the two button click skite handlers fres both Browse… buttons and provide their implementations as follows:. Dim folder As String. Here, both event handlers are pretty much identical, except that they use different text controls txtSourceFolder and txtDestFolder to obtain the current folder name entered in those controls, call BrowseForFolderDlg function from FolderPicker module and the new folder path returned is set back into the respective text box.
Coreldraw technical suite x7 tutorial free we are ready to implement the main image processing function to do all нажмите чтобы прочитать больше image manipulation. Dim width As Longheight As Long. Dim maintainAspect As Boolean. If CorelScriptTools. Exit Sub. Coreldraw technical suite x7 tutorial free If.
If Not IsNumeric coreldraw technical suite x7 tutorial free. Text Then. MsgBox "Invalid width"vbCritical. If Not IsNumeric txtHeight. MsgBox "Invalid frewvbCritical. ResizeImages sourceFolder, destFolder, width, height, maintainAspect. Unload Me. This function takes the input from source and destination folder text boxes and validates that they contain valid folder names. Then it converts the required width and height of the image from the content of the text boxes strings to integer numbers which will be used when resizing images.
Finally, it calls the ResizeImages function to do the actual image conversion. After all the images are processed inside ResizeImages, the dialog is closed by invoking the Unload method.
When maintainAspect tutorual is set wuite True, there is additional logic to preserve the image aspect ratio. ByVal maintainAspect As По этому сообщению. Dim f As String. If maintainAspect Then. Fgee Then. Resample w, h. Feel free and experiment with the source code and build more complex solutions to the problems you may encounter in your day-to-day work. Share History More Cancel. Source Folder:.
Destination Folder:. Maintain proportions. Resize Images.
Comments
Post a Comment