» Вопросы по Delphi 2

Как сделать, чтобы при двух Мемо, можно было перетаскивать текст из одного в другое по типу Drag & Drop.

Barakuda7

Весь текст или то что выделено ?


Добавлено:
А зачем? Можно же cut и past сделать.

То что выделено.
Из мемо "Оригинал" в мемо "Перевод" так будет быстре чем копировать потом вставлять.

Привет всем.

Подскажите как можно нарисовать векторные диаграммы токов и напряжений.

Andysoft3C
Ручками. Canvas.MoveTo(x,y) и Canvas.LineTo(x,y)
А вот как имено должны выглядеть стрелки, углы - это ты сам должен знать.

Цитата:

Как сделать, чтобы при двух Мемо, можно было перетаскивать текст из одного в другое по типу Drag & Drop.

Жаль что вопрос им же и остался.

Barakuda7

Цитата:

Жаль что вопрос им же и остался.

Ну нету у Мемо драг и дропа, если не веришь, запусти нотепад и попробуй сделать драг и дроп. Так как мемо - это по сути многолайновый едит, в котором нет поддержки фичи, нужен ДиД - юзай ричедит.

Help!

Компонент advstringgrid. Большие ячейки он скроллит некорректно. Нет плавной прокрутки. Как решить эту проблему?

Barakuda7

Можно это дело повесить на правую кнопку мыши. Т.е. при перетягивании с зажатой правой клавишей мыши будет текст перекидываться из одного мемо в другой. А тебе нужно чтобы в определенное место текст помещался или достаточно в конец текста ?

Подскажите как повернуть нарисованную или нарисовать повернутую, на канвасе, линию на заданный угол в град.
нужно что то типа такой функции.
DrawLine(X,Y,Length,Angle)

BDS 2006
Каким тэгом можно описать локальную переменную в процедуре, что бы затем в хинте, при наведении на нее выскакивало описание ?
Типа:
var
/// <value>Description</value>
ID: Integer;

или
var
/// <param name="ID">Description</param>
ID: Integer;

По тегам из доки что-то не получилось.

Andysoft3C
(полярные --> декартовы и обратно)
X = R Cos(angle);
Y = R Sin(angle);
R - длина линии, Angle - угол
R = Sqrt(X^2 + Y^2)
angle = arctg(Y/X)

dimonadv

Цитата:

По тегам из доки что-то не получилось.

В каком разделе доки это описано?

Цитата:

В каком разделе доки это описано?

Recommended Tags for Documentation Comments

dimonadv

Цитата:

Recommended Tags for Documentation Comments

А разве это для Delphi работает? "Recommended Tags for Documentation Comments" это вроде как часть Microsoft .NET Framework SDK - C# Programmer's Reference.

Цитата:

А разве это для Delphi работает?

Без проблем, попробуйте.
Вот примерчик:
[more]
/// <summary>
/// Функция возвращает список зависимостей (Первичных и внешних ключей) у таблицы
/// </summary>
/// <param name="TableName">Имя таблицы</param>
/// <param name="PKList">Массив имен первичных ключей</param>
/// <param name="FKList">Массив имен внешних ключей</param>
/// <param name="FKTableNameList">Массив имен таблиц в которых создан соотв. внешний ключ</param>
procedure GetDependenciesList(TableName: string; var PKList, FKList,
FKTableNameList: THArrayString);
[/more]

После подобного описания функции в классе хинт существенным образом преображается

Как показывать окно класса THintWindow поверх всех окон?
По идее в процедуре ActivateHint есть вызов следующего:

Код: SetWindowPos(Handle, HWND_TOPMOST, Rect.Left, Rect.Top, Width, Height, SWP_NOACTIVATE);

Такой вопрос: Вызываю WebBrowser.Navigate('http://сайт1') и через 10 секунд - WebBrowser.Navigate('http://сайт2'). Будет ли считаться, что я на сайт2 попал с сайт1?

Jokerjar
Нет. Даже через 1 секунду - нет.

EZH, а как тогда такое замутить? В делфи

Jokerjar
Тебе надо заполнять поле HTTP_REFERER у http запроса. Поищи в поисковиках примеры с названием тип HTTPGet.

Заходить надо на сатй2 предварительно указав где-то в глубинах referer = сайт1. Можно самому полнонстью генерить запрос, и полученное отдавать браузеру. www.w3.org вам в помошь - ищите на нём спецификацию http 1.0/1.1 или какие-нибуть компоненты умеющие сами это делать.

Уф.. вроде разобрался. Теперь возник другой вопрос. Как в TWebBrowser загрузить страницу через Proxy?

Работаю с майлслотами в WINXP. ф-я writefile при записи в майлслот ыдает код ошибки 64 - как узнать что это за ошибка?

31416
Посмотреть в MSDN - это вообще вещь необходимая при работе с тем или иным микрософтовским АПИ.
В частности ссылка на описание кодов ошибок
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/debug/base/system_error_codes.asp

Добавлено:
dimonadv
Наверное это работает только в Delphi для .NET - в Win32 варианте такого нет.
Этот вариант делфи не ставил, но попробовал в C# и почитал доку. <value> описывает свойство, <param> - параметр метода, средств описания локальной переменной похоже что нет.

Люди подскажите есть какие стандартные в дельфи средства чтобы собрать из программы ZIP архив?

31416
Цитата:

собрать из программы ZIP архив?

стандартных - нет (имхо).
а вот сторонних компонент - вагон и маленькая тележка (причём в т.ч. и бесплатных!)
на вскидку ZipTV (коммерческая, но в соответствующем топике есть даже в сырцах),
TurboPower Abbrevia (бесплатная, в сырцах) ... и т.д.

31416, RomanTim

Цитата:

как узнать что это за ошибка?

RaiseLastOSError;


Jokerjar

Цитата:

TWebBrowser

возьми фришный Embedded Web Browser (_http://www.bsalsa.com/downloads.html), там и прокси и другое ...

VadimLou, а где там прокси? Подскажи а?

VadimLou
В каких-то случаях можно и через Exception, но далеко не всегда он нужен, придется тут же наворачивать логику по его отлову