Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

Мастера DELPHI. Новости мира компонент, FAQ, статьи...


Служба Рассылок Subscribe.Ru
Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

Выпуск от 20.10.01 09:04

Новые компоненты   |x|
  • c2pas32 (18.10.01 12:33)
    Утилита командной строки для трасляции *.c и *.h файлов в *.pas модули. Переводит около 80% кода языка СИ (на чистом Win32 API) в код на паскале (в частности, Delphi4,5, VP, FPC). Дополнительно форматирует переведенный текст для удобства чтения.
    Источник: www.astonshell.com/rus/  
    -= · Tools · =-

  • Полный список компонент смотрите на сайте...
Кое-что из нашей кладовки   |x|
  • WinPopup32 Dimka Maslov dms@nm.ru   (19.10.01 10:56)
    Компонент для передачи сообщений по локальной сети (по принципу WinPopup). Работает на основе функции Netbios.
    Для работы необходимо, чтобы в настройках сети протокол NetBEUI использовался по умолчанию.
    »»» Скачать: исходные тексты (44кб)
  • Crossword Puzzle liggain liggain@rambler.ru   (18.10.01 15:41)
    Программа для решения и составления кроссвордов. Вместе с ДЕМО есть несколько уже готовых кроссвордов. Просьба замечание и предложения присылать на e-mail (см. readme.txt). Исходники не ложу (есть еще поле для деятельности).
    »»» Скачать: исходные тексты (330кб)
Лучшее из нашего FAQ   |x|
Как в RichEdit или TMemo реализовать при нажатии Enter-а позиционирование курстора в позицию
как в предыдущей строке



unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ComCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
RichEdit1: TRichEdit;
procedure RichEdit1KeyPress(Sender: TObject; var Key: Char);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

uses richedit;

{$R *.DFM}


procedure TForm1.RichEdit1KeyPress(Sender: TObject; var Key: Char);
var
line, col, indent: integer;
S: String;
begin
if key = #13 then begin
key := #0;
with sender as TRichEdit do begin
{figure out line and column position of caret}
line := PerForm( EM_EXLINEFROMCHAR, 0, SelStart );
Col := SelStart - Perform( EM_LINEINDEX, line, 0 );
{get part of current line in front of caret}
S:= Copy( lines[ line ], 1, col );
{count blanks and tabs in this string}
indent := 0;
while (indent < length( S )) and (S[indent + 1] in [' ', #9])
do
Inc( indent );
{insert a linebreak followed by the substring of blanks and tabs}
SelText := #13#10 + Copy(S, 1, indent);
end;
end;
end;

end.

»»» Прислать свои комментарии

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Понимание много-поточности в VCL для веб-серверных ISAPI-расширений
В среде Delphi можно создавать высокоэффективные веб-серверные ISAPI-расширения на основе технологии WebBroker. Создайте проект с помощью мастера (New -> Web Server Application - ISAPI DLL). Прилагаемая справочная документация, а так же демонстрационный пример "$(DELPHI)\Demos\Webserv" позволяют достаточно быстро освоиться в приемах написания веб-серверных ISAPI-расширений...
Другие сайты о DELPHI   |x|
Windway pages
Тут собраны несколько моих любимых библиотек под Delphi, а также пара программок, написаных мной на этих библиотеках...
Одна из них PE (Power Editor), мне кажется достаточно интересной заменой ...
Опрос населения :)
Готовится к выпуску журнал "Мастера DELPHI". За какую сумму вы готовы его покупать?
»»» 80р.
»»» 100р.
»»» 120р.
»»» 150р.
Журнал "Мастера DELPHI"  |x|
Давно витающая в воздухе нашего сайта идея создания журнала, посвященного всеми нами любимой среде разработки Delphi, похоже, обретает зримую форму. Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
Для души

Хокку дня
Только художник
Видит, как наклоняет
Травинку роса.

Афоризмы
Говорить можно с каждым, а поговорить, почитай, и не с кем (Феликс Хвалибуг)

Фраза дня
Мирные жители зверски расстреляли оккупантов.

И на закуску коротенький анекдот
- Дыхните.
- Пожалуйста.
- Еще раз.
- Зачем?
- Очень запах нравится.

Фотоприколы.
Начните день с хорошего настроения!
http://delphi.mastak.ru/cgi-bin/prikol.pl?id=9272


На этом позвольте откланяться и пожелать вам удачного дня.
Искренне ваш, Алексей (delphi@mastak.com)

Добро пожаловать на сайт -= Мастера DELPHI =- 


http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу
Рейтингуется SpyLog

В избранное