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

RostY ну брось, если не трудно, на fromnet[барбос]front.ru

whitewolfs
Бросил. Если не дойдет иди в тему "Коммерческие компоненты" и тяни с обменника

RostY Сенкс!

Добавлено:
Ребят, еще просьбочка - киньте кто нибудь мне на fromnet[барбос]front.ru леченый TXLSFile.Library.v4.0 или ссылку дайте... Он есть в обменнике, но мне почемуто уже дня 3 оттуда ничего не приходит... Заранее спасибо!

Aaz68
Если все файлы на месте, то это бывает из за неправильно прописаных переменных сред в дельфе (путь до БДС) или из за неправильных путей к соурчам и либам.

Уважаемые, помогите сделать хитрое:
есть моя программа, зарегистрированная в системе по-умолчанию для файлов с расширением .ххх Как сделать, чтобы в контекстном меню Проводника пункт "Типа открыть моей прогой" появлялся ТОЛЬКО когда файлов такого типа .ххх выделено несколько? Как пример - программа которая объединяет файлы этого типа в один - ее пункт меню должен появляться только когда выделено 2 и больше файлов. Спасибо.

Думаю, никак... разве-что переписать виндозный Explorer

RostY

Цитата:

Думаю, никак... разве-что переписать виндозный Explorer

Уверен? Делать библиотеку-обработчик, в ней получать список файлов, если файл один - hide/disable пункт меню.
Если покопаться в реестре - примерно так это обычно и выглядит. Или я чего-то не улавливаю?

hostage2002, копай в сторону Shell Extensions, этот пример тебе подойдёт http://www.codeproject.com/shell/ShellExtGuide1.asp

ArtemiyUO

Цитата:

это бывает из за неправильно прописаных переменных сред в дельфе (путь до БДС) или из за неправильных путей к соурчам и либам

Не понял, он их при инсталяции разве сам не пишет (пути всмысле)?

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

Кто-нибудь юзал TElasticForm v7 совместно с EhLib'ом ? Подозреваю, что имеется какая-то несовместимость, ибо при изменении размера формы появляется "List index out of bounds (30)" Что не так?

PS Есть ли альтернативы TElasticForm ?

Aaz68

Цитата:

Delphi10 lite SP2,

1. Потому что дистрибут обрезанный.
Возьми полный. фиг его знает чего там обрезали.
2. Есть русские буквы в путях к Delphi или в путях к проекту, или в %Temp%

relictus

Цитата:

"List index out of bounds (30)"

Смотри на свой код на предмет

Код:
for i:=0 to list.count do

vserd
да нет в моем коде подобных циклов...
при трассировке ошибки лезу куда-то в дебри биб-ки ehlib'a - там следы обрываются

вопрос насчет альтернативы эластику - открыт!

relictus

Цитата:

при трассировке ошибки лезу куда-то в дебри биб-ки ehlib'a

немного не по теме вопроса... Но может и помочь...
Есть такой компонент - EurekaLog [more]
например - EurekaLog.v5.1.10.Enterprise.for.Delphi.BCB.Retail-SSG
EurekaLog is the new add-in tool that gives to your
application (GUI, Console, Web, etc.) the power to
catch every exception and every infinite-loops/deadlock
bugs, generating a detailed log of call stack (with
unit, class, method and line # - like this example),
showing and sending it back to you via email or Web
message (using the HTTP-S/FTP protocols), speeding up
the process of bug-locating and bug-resolving by a
factor of 10!

It's easy to use because it's fully integrated into the
IDE (as a matter of fact, you need only a single
rebuild to add this new ability to your applications).
EurekaLog does not decrease application performances
(because it runs only when exceptions occur) and it
increases the compiled file size by just 0.5% - 4% (it
uses this space to store some additional, compressed
and encoded debugging information). To works EurekaLog
needs only of the compiled file (not .map file).

EurekaLog is compatible with Delphi 3, 4, 5, 6, 7, 2005
- C++Builder 5, 6 and it works on all Windows
platforms, from Win 95 to Win XP (Win 2003 server
included). [/more]

Тогда при возникновении ошибки - Eureka покажет вам строчку, которая спровоцировала ошибку... Может быть это Вам поможет.

SERGE_BLIZNUK
Спасибо, попробую!

Использую TDownloadURL для сохранения в файл URL.
Нужно показать динамику процесса загрузки при помощи прогресс-бара.
Может, у кого-нибудь есть кусок готового кода.

Ребят, нужна помощь. Кому не трудно, пройдите по ссылке: _http://www.krsc.ru/defdv.htm. Вопрос такой - как в делфи нарисовать кривую R(a).
Я сделал так -
PaintBox1.Canvas.Pixels[250+trunc(100*Ra*cos(i)),
150+trunc(100*Ra*sin(i))]:= clRed; (i=0..360)
Косяк в том, что при Ra=0, график, естественно, сводится в 0.
Прийму любой совет

valerka78
а не хочешь ли ты TChart использовать?

Ходил я по ссылке _http://www.krsc.ru/defdv.htm, но никакой функции R(a) именно на этой странице я не встретил. А вообще лучше вместо Pixels использовать LineTo, чтобы получить не набор точек, а именно график.

Мдам Сорри, правлю ссылку _http://www.krsc.ru/j3c.htm
Вопрос в использовании pixels или lineto не принципиален Главное найти решение.
А TChart - ну не лежит у меня к нему душа, и ничего не могу поделать

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

Ну гляньте кто-нибудь как решить проблемку: http://forum.ru-board.com/topic.cgi?forum=33&topic=1838&start=100#20
Все-таки вопрос скорее не по EhLib'у, а по БД.

relictus
На событие изменения данных в Датасете делай Датасет.Post;

нужно сделать конвертер
есть к примеру строка

Дата счет сумма
│ 1.12.2006│09│308 │30223810700000000002 │ 83 │

надо сделать конвертер который будет из текстового файла перекидывать
определенные поля (в моем случае поле дата счет и сумма)
причем таких строк много...
каким способом можно это осуществить ?





Добавлено:
че то цифры нормально не отобразились некоторые данные которые написал я

GTA3

Читай построчно текстовый файл, отбирай данные в переменные и пиши в таблицу так:
[more]
Table1.Append;
Table1.FieldByName('FDate').AsString := vDate;
Table1.FieldByName('FAccount').AsString := vAcc;
Table1.FieldByName('FSumm').AsString := vSumm;
...
Table1.Post;

- в vDate, vAcc, vSumm будут хранится данные, которые ты прочитал из текущей строки файла
[/more]

killerbeanjeka
может поможешь мне это сделать?
я сам просто не программер а это надо успеть сделать сегодня...
был бы очень признателен за помощь

GTA3
Если неотозвались и сильно очень нада - стукни мне в асю 219221938

GTA3

Если еще надо помощь, то вышли мне файл (ну или часть файла) которые надо переконвертировать на myagkiy(собака)gmail.com

Добрый день, комрады.
Есть вопрос по работе с компонентом TTreeView. Надеюсь, что формулировку поставленного вопроса сделал правильно.

Я пользуюсь этим методом, что бы присвоить Items[1].Date ссылку на файл html
var
S:String;
P:PString;
begin
S:=Edit3.Text; //в поле Edit3 введена полная ссылка на файл html
New(p);
p^ := s;
Form1.TreeView1.Items[1].Data:=p;
//собственно если вывести вот такое сообщение, то можно увидеть полностью всю ссылку на файл
ShowMessage(String(Form1.TreeView1.Items[1].Data^));
end;

Мне нужен иерархический список, при выборе элементы списка компонент TWebBrowser открывал html страницу по указанной ссылке, таким образом при выборе элемента Items[1] отображается страница.

Теперь собственно задача: как мне присвоить каждому элементу ссылку на файл, сохранить все данные и затем при запуске программы что бы все восстанавливалось. И как собственно определить с каким ID Items я работаю в текущий момент, что бы присвоить ему значение.
Или подскажите каким методом мне пользоваться, что бы сохранять и загружать структуру TTreeView, при этом сохраняя параметр Date каждого Items???

Заранее всем спасибо.

Zubrb
Ну и кто тебе мешает написать сохранение? Первый вариант - сохранятся рекурсивно в текстовый документ или xml. Когда то давно я решил эту проблему гараздо проще. Имя ноды - это собственно нужный текст+'|'+имя файла.Теперь мы можем воспользоваться встроеными методами в treeView. А что бы пользователя не смущал длиный текст ноды, то я делаю ручную прорисовку.