Снимаю картинку с веб-камеры через SendMessage(hWndC, WM_CAP_GRAB_FRAME, 0, 0). Всё получается, если только указать Handle при инициализации на форму или элемент управления формой (кнопка, панель), а надо поместить картинку на Image. (читать всё…)

Допустим, на форме есть растянутый Image1, в него грузится картинка. Сверху Image1 лежит Image2 (размером меньше) и в его канву нужно загрузить тот кусок рисунка из Image1 который как бы закрывает Image2. Другими словами, чтобы Image2 фотографировала в канву то, что находится под ней (читать всё…)

(читать всё…)

Нужно написать программу, считывает с клавиатуры определенное колличество цифр, а на экран выводит сумму наибольшей цифры, и цифру, стоящую на пятом месте в введенной строке (читать всё…)

(читать всё…)

Думаю расширить круг пользователей своего ПО.
первый и последний ЯП: Delphi

Задумался о программировани под linux.

Знаю, что есть Lazarus. Прошу убедить меня в том, что лазарус стоит того, чтобы помучаться с ним и пописать на нем. Можно пару примеров успешный проектов Win/Linux

Задумываюсь ,что это все же большие грабли, которые я себе строю и на которые рано или поздно, но наступлю.

Хочеться писать ПО в обе стороны. С чего начать? Точнее, на какой ЯП можно легко и плавно перейти с Delphi(Object Pascal)?

Интересует управление системой(Shell), запуск/остановка процессов, сервисов/демонов, многопоточность, ввод/вывод не GUI приложений, тамошние окна(GUI). (читать всё…)

Вопрос не сложный. Как скачать файл сразу в перемнную, при этом нельзя что бы он где то еще был кроме этой самой переменной. (читать всё…)

(читать всё…)

отключить сетевое соединение, через которое подключен инетрнет! (читать всё…)

(читать всё…)

(читать всё…)

Всем добрый вечер. Возникла проблема – получать сообщения Exception всегда на одном и том же языке, вне зависимости от региональных настроек системы (например использовать английский)
В интернете под NET было найдено такое решение. Но в Delphi нет ChangeUICulture
Пробовал изменять локаль потока – продолжают выводиться на системном языке
Что еще можно попробовать? (нужно чтобы метод не требовал привилегий администратора) (читать всё…)

От ведущего.

Добрый день, читатели рассылки. В сегодняшнем выпуске обзор интересных тем с форума.

(читать всё…)

(читать всё…)

Как написать код для нескольких компонентов, например имеется 10 кнопка (batton1, batton2… batton10) и при нажатии на каждую выполняется редактирования именно нажатой кнопки. (читать всё…)

у меня есть массив, вводить в него нужно только числа, как сделать что бы при вводе буквы выдавало ошибку ? (читать всё…)

вообщем дело вот в чем не знаю как прописать код в программе чтобы он искал текст из edit1 и заменял на то что в edit2 (читать всё…)

(читать всё…)

есть библиотека, состоящая из нескольких модулей (*.pas), и есть процедура, которую я хочу использовать как и в самих модулях dll, так и в основном файле dll (*.dpr) в разделе инициализации (begin … end).
Может есть какой-нибудь способ, использовать один экземпляр (код) процедуры на всю dll? (чтоб она была доступна/видима как в *.dpr., так и в модулях *.pas) (читать всё…)

(читать всё…)

Необходимо из xls файла сделать xml.Сам xls представляет собой довольно большую таблицу,расписание занятий.Пробовал обращаться к таблице через Variant,но дело в том,что программа должна быть универсальной для любого количества столбцов и строк,а также любой разметки.Поэтому пришлось сохранять как Текстовый документ(с разделителем табуляцией).Подскажите как мне вытащить данные и записать их в группы,по столбцам. (читать всё…)

(читать всё…)

Доброго времени суток!

Изучаю язык программирования Ruby, Ruby on Rails.

Ситуация выглядит так:
1. 1.rb – подопытный кролик
2, ru.bat – «поднос» подопытного к ruby-интерпритатору

Данная схема хоть и работает, но крайне не удобна.

Знающие, подскажите вменяемый редактор/ide в котором есть кнопока run, для экзекуции написанного в интерпритаторе
(читать всё…)

Теперь мне нужно вот что: присвоить созданным подузлам номер итема, что в дальнейшем, в самом дереве, я мог обращаться к ним для, например, удаления выбранного узла или дальнейших действий с этим индексом итема. (читать всё…)

хотел бы узнать, как я могу встроить свой пункт в контекстное меню любого файла, а также директории (Win, естественно). Находил, что эта проблема решается 2-мя способами через COM и через реестр. Допустим, я сделаю это. Как потом мне обработать нажатие этого пункта меню? Дальше. Если я просто сделаю вместо контекстного меню, вариант открытия файла(любого) с помощью моей программы (Открыть с помощью… -> моя программа) как мне передать в запускающуюся МОЮ программу имя этого файла? (читать всё…)

От ведущего.

Добрый день, читатели рассылки. Сегодня выходит очередной выпуск рассылки. На нашем форуме появилось много нового и интересного материала. Часть его читайте в сегодняшнем выпуске.

(читать всё…)

Привет, помогите разобраться, как мне можно создать простейшую программу в Делфи с использованием DLL, допустим подсчитать а+b.

library Project2;

uses

  SysUtils,

  Classes,

  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

//Сумма значений х и у

function Sum (X,Y: Integer): integer;

begin

Result:=X+Y

end;

exports Sum;

begin

end.

unit Unit1;

interface
uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, StdCtrls;
type

  TForm1 = class(TForm)

    Button1: TButton;

    procedure Button1Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;
var

  Form1: TForm1;
implementation

// тут объявляем нашу библиотеку и функцию которую она экспортирует

 function Sum (X,Y: Integer): integer;external 'Project2.dll';
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);

begin

//пример использования

Button1.Caption := IntToStr(Sum(1,2));

end;

end.