lazarus

How to work with AMMediaType for video filters

别说谁变了你拦得住时间么 提交于 2020-02-04 11:42:04
问题 I am using Video Resizer DSP Video Resizer DSP to resize my video. I work with Lazarus Free Pascal and DSPack. This site explains how to use: http://alax.info/blog/1371 CoCreateInstance the DSP as DMO and add it to DMO Wrapper Filter Use IWMResizerProps::SetFullCropRegion to initialize the DSP Connect input pin Set output type via IMediaObject::SetOutputType IGraphBuilder::ConnectDirect output pin I write this: //Create Resizer DMO hr := CoCreateInstance(CLSID_DMOWrapperFilter, NIL, CLSCTX

ununtu安装lazarus-project_2.0.6 fpc-src_3.0.4-2

邮差的信 提交于 2020-01-29 17:39:24
1----------------------- https://sourceforge.net/projects/lazarus/files/Lazarus%20Linux%20amd64%20DEB/Lazarus%202.0.6/lazarus-project_2.0.6-0_amd64.deb/download https://sourceforge.net/projects/lazarus/files/Lazarus%20Linux%20amd64%20DEB/Lazarus%202.0.6/fpc-laz_3.0.4-1_amd64.deb/download https://sourceforge.net/projects/lazarus/files/Lazarus%20Linux%20amd64%20DEB/Lazarus%202.0.6/fpc-src_3.0.4-2_amd64.deb/download On a DEB based System. On a DEB based system, you almost certainly should use gdebi to install any downloaded DEB. It might already be installed, if not, install it first. You can use

How to Invalidate only part of a paintbox/bitmap to optimise its performance?

我怕爱的太早我们不能终老 提交于 2020-01-23 01:48:18
问题 The question relates to: Drawing on a paintbox - How to keep up with mouse movements without delay? I was going to at some point ask the question of how to repaint only part of a paintbox without invalidating the whole paintbox, which is slow when there is a lot of drawing going on or in my case when there are a lot of tiles drawn on screen. From the link above Peter Kostov did touch on the subject briefly in one of his comments: you can partly BitBlt the offscreen bitmap (only regions where

runerror(102) file not assigned?

倾然丶 夕夏残阳落幕 提交于 2020-01-17 01:56:06
问题 begin reset(f); assignfile(f, 'data.txt'); Reset(f); found:= false; search := edit1.text ; repeat read(f, phone) ; read(f, cusfname); read(f, adress); found:= search = phone until eof(f) or found; if found then memo1.append(phone); memo1.append(cusfname); memo1.append(adress); closefile(f) ; if not found then showmessage('member not found'); When I run this I get runerror(102) file not assigned??????? p.s I have assigned the variables in the procedure publically. 回答1: First reset(f) is wrong,

Saving and Loading Treeview using XML

筅森魡賤 提交于 2020-01-13 04:11:40
问题 Note Sorry in advance for the long post, I though it would be best to put as much information on as possible rather than fill the gaps when needed. Note although I have tagged this as Delphi as well and do own and still use Delphi XE I am now using Lazarus as my primary IDE, I simply cannot afford to purchase the newer Delphi versions and now Lazarus is becoming more stable it makes sense to me to make the switch to Lazarus. For this question I have included a zip attachment with project

Saving and Loading Treeview using XML

女生的网名这么多〃 提交于 2020-01-13 04:11:08
问题 Note Sorry in advance for the long post, I though it would be best to put as much information on as possible rather than fill the gaps when needed. Note although I have tagged this as Delphi as well and do own and still use Delphi XE I am now using Lazarus as my primary IDE, I simply cannot afford to purchase the newer Delphi versions and now Lazarus is becoming more stable it makes sense to me to make the switch to Lazarus. For this question I have included a zip attachment with project

Lazarus: How to list all the available network connection on a system?

主宰稳场 提交于 2020-01-11 06:44:29
问题 I am writing a program on a Linux system using Lazarus IDE. The program is supposed to connect to the Internet or Intranet. So, I want to display to the user list of all the available network connections that they can use to connect to the Internet or Intranet like wifi, if there are two active network cards on the system, then this program should display their available connections. At the moment, I don't know where to start or what tool(s) to use. Any hints, clues or advice will be greatly

Synchronize () DLL freezes without errors and crashes

自作多情 提交于 2020-01-06 20:09:01
问题 I built a modular program consisting of several programs (exe), and in some cases these modules are also in DLL. There are about 6 modules. All of these modules used functions of a Thread. This thread does not use visual components, what it does is basically analyze huge files (> 1GB). To improve the efficiency and organization, extract all the code relating to this file analysis, which is used by each of the modules. This facilitates updating and find error. The threads worked normally

System command executes but is immediately backgrounded

末鹿安然 提交于 2020-01-06 03:32:05
问题 I'm attempting to use the TProcess unit to execute ssh to connect to one of my servers and provide me with the shell. It's a rewrite of one I had in Ruby as the execution time for Ruby is very slow. When I run my Process.Execute function, I am presented with the shell but it is immediately backgrounded. Running pgrep ssh reveals that it is running but I have no access to it whatsoever, using fg does not bring it back. The code is as follows for this segment: if HasOption('c', 'connect') then

Lazarus & Free Pascal - How to recursively copy a source directory of files to another directory?

我们两清 提交于 2020-01-01 19:26:14
问题 I need to add some functionality to my Lazarus & Free Pascal GUI program - I need it to also copy files from a users chosen dir to another dir. I have a "Choose Source" TSelectDirectoryDialog button onclick event for the source directory and a "Choose Destination" TSelectDirectoryDialog button onclick event for the destination dir. I have a 3rd button to do the copying from Source to Destination. So far, I have found CopyFile that copies the files and the original date attributes, but it