Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (все версии) - часть 3

Модерирует : ShIvADeSt

ShIvADeSt (07-04-2008 02:27): продолжение в http://forum.ru-board.com/topic.cgi?forum=33&topic=9383  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

   

Arvur



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
GoldFire
В этой теме обсуждается сама среда разработки. Точнее - "вопросы, не связанные с узкой направленностью"

Цитата:
прошу помочь с написаниями двух заданий в этом языке программирования:  

Вам скорее всего сюда [?]... Ну или по второй ссылке из моей подписи
Если хочется бесплатно - видимо, имеет смысл создавать отдельный топик, по аналогии с вот этим [?].

Всего записей: 2111 | Зарегистр. 18-01-2002 | Отправлено: 00:45 22-04-2007 | Исправлено: Arvur, 00:50 22-04-2007
onyxhall



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Подскажите пожалуйста как правильно реализовать множественное наследование. Понятно, что через интерфейсы, но как конкретно?  
   Допустим имеются классы TClass1, TClass2 и TMyClass. TClass1 умеет взаимодействовать только с TClass2. Как сделать так, чтобы TClass1 взаимодействовал с TMyClass и не отличал его от TClass2?
  (TMyClass уже унаследован от другого класса)

Всего записей: 51 | Зарегистр. 06-11-2006 | Отправлено: 05:44 23-04-2007 | Исправлено: onyxhall, 05:47 23-04-2007
makbeth

Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
onyxhall
Нужно описать интерфейс (например, IClass2), включив в него методы и свойства, посредством которых общаются классы TClass1 и классы TClass2, TMyClass. Далее включить в списки наследования классов TClass2 и TMyClass этот интерфейс.
Подробнее... [?]

Всего записей: 241 | Зарегистр. 08-12-2004 | Отправлено: 06:05 23-04-2007
onyxhall



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
makbeth
Ага, вроде бы понял. Попробую.
Спасибо!

Всего записей: 51 | Зарегистр. 06-11-2006 | Отправлено: 06:19 23-04-2007
GreatOne



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Люди!! Подскажите какой функцией можно записать гиперссылку в документ MS Word ?

Всего записей: 85 | Зарегистр. 15-03-2007 | Отправлено: 11:12 23-04-2007
jONES1979



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
GreatOne конкретизируй. Из дельфи? Через OLE? покажи свой код, где не получается добавить гиперссылку. Не мы же его будем за тебя писать

Всего записей: 324 | Зарегистр. 20-05-2005 | Отправлено: 12:00 23-04-2007
GreatOne



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
jONES1979
 
Да из дельфи:
var
  Word: Variant;
begin
  Word := CreateOleObject('Word.Basic');
  with Word do
  begin
    FileNew('Normal');
    Insert('Ýòî ïåðâàÿ ñòðî÷êà'#13);
    Insert('Ýòî âòîðàÿ ñòðî÷êà'#13);
    InsertHyperlink(); //Выт эта команда не работает у меня
    FileSaveAs('c:\temp\test.txt', 3);
  end;
end;
 
InsertHyperlink(); - Вот эта команда не работает у меня, я не знаю че в ней писать - всегда выдает ошибку что мало параметров.

Всего записей: 85 | Зарегистр. 15-03-2007 | Отправлено: 12:31 23-04-2007
RostY



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
цитата из вордячего хелпа:
 
Hyperlink object that represents a new hyperlink added to a range, selection, or document.
 
expression.Add(Anchor, Address, SubAddress, ScreenTip, TextToDisplay, Target)
expression    Required. An expression that returns a Hyperlinks object.
 
Anchor   Required Object. The text or graphic that you want turned into a hyperlink.
 
Address   Optional Variant. The address for the specified link. The address can be an e-mail address, an Internet address, or a file name. Note that Microsoft Word doesn't check the accuracy of the address.
 
SubAddress   Optional Variant. The name of a location within the destination file, such as a bookmark, named range, or slide number.
 
ScreenTip   Optional Variant. The text that appears as a ScreenTip when the mouse pointer is positioned over the specified hyperlink. The default value is Address.
 
TextToDisplay   Optional Variant. The display text of the specified hyperlink. The value of this argument replaces the text or graphic specified by Anchor.
 
Target   Optional Variant. The name of the frame or window in which you want to load the specified hyperlink.
 
 
 
Добавлено:
т.е. делай следующее:
 
procedure TForm1.Button1Click(Sender: TObject);
var
  Word: OleVariant;
begin
  Word := CreateOleObject('Word.Application');
  Word.Documents.Add('Normal');
  Word.ActiveDocument.hyperLinks.Add(Word.Selection.Range,
                                'http://forum.ru-board.com',
                                '',
                                '',
                                'ру-борд');
  Word.Visible := 1;
end;

Всего записей: 387 | Зарегистр. 11-01-2006 | Отправлено: 13:43 23-04-2007
GreatOne



Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
RostY
 
Спасибо большое!!

Всего записей: 85 | Зарегистр. 15-03-2007 | Отправлено: 14:28 23-04-2007
rs

Advanced Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
подскажите, пожалуйста, как сделать следующее:
 
взять текст со всеми атрибутами форматирования из одного конрола типа TRichEdit  и  программным путём вставить его в начало уже заполненного и тоже отформатированного другого контрола TRichEdit, не затирая при этом содержимое второго контрола
 
другими словами, результирующий контрол должен содержать "сумму" двух контролов без потери форматирования каждого из них до слияния
 
простые присваивания RichEdit2.Text:=RichEdit1.Text не проходят - теряется форматирование
 
RichEdit1.Lines.SaveToStream + RichEdit2.Lines.LoadFromStream - тоже не прокатывают, теряется исходное содержимое второго контрола
 
зы
в общем-то, на самом деле нужно сделать следующее: из проги на одной рабочей станции передать форматированный rich-текст в прогу на другой рабочей станции (через udp-протокол) и принявшая рабочаяя станция должна втавить полученный форматированный rich-текст в контрол, содержащий полученные ранее второй рабочей станцией форматированные rich-сообщения

Всего записей: 1344 | Зарегистр. 19-04-2003 | Отправлено: 18:02 23-04-2007
HateYou



Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Помогите с Delphi7, пожалуйста!!!
Я создал интерфейс программы - разместил на форме нужные компоненты...
Всё было нормально до определённых пор: по умолчанию размер формы был нормальный, а вот когда я в запущенной программе развернул форму на весь экран, все компоненты на форме остались на своих прежних местах... Нельзя ли сделать так, чтобы при увеличении размера формы компоненты тоже меняли свой размер и положение пропорционально ей??? Помогите!!!

Всего записей: 2 | Зарегистр. 21-04-2007 | Отправлено: 21:38 23-04-2007
OdesitVadim



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
можно. Есть такие свойства как Align Anchors. Поиграйтесь ними.

----------
Press any key to continue or any other key to exit
Пишите так, чтобы не было стыдно за нобелевскую премию.

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 22:42 23-04-2007
HateYou



Newbie
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
OdesitVadim
Спасибочки!!!

Всего записей: 2 | Зарегистр. 21-04-2007 | Отправлено: 23:21 24-04-2007
HekTo

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Вопрос по D2007: эта зараза у меня при работе периодически начинает выдавать ошибку №1026 (кажется) DCC23 Error: file 'project.drf' not found.
 
При этом если скомпиленого exe-шника нет, то она его нормально создает, если он есть - новую версию с изменениями в коне не создаёт. Ну и откладкой пользоваться нельзя.  
 
Кто-нибудь знает в чем причина и как избавиться ? Пока приходится полностью перезапускать среду... и что вообще за файлы такие .drf, вроке в дельфи таких никогда не было ?

Всего записей: 189 | Зарегистр. 30-09-2003 | Отправлено: 00:19 25-04-2007
OdesitVadim



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
попробуйте ребилд делать Ctrl+F9. Очень часто помогало с подобными проблемами и в младших версиях

----------
Press any key to continue or any other key to exit
Пишите так, чтобы не было стыдно за нобелевскую премию.

Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 01:35 25-04-2007
s1n



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Помогите, не пойму где грабли. Читаю данные из ini файла в ListBox.
Инишник такого вида:
[section]
param=data1
param=data2
param=data3
....
делаю следующим образом:

Код:
procedure TForm1.Button1Click(Sender: TObject);
  var
  IniFile: TIniFile;
  begin
  if FileExists (GetCurrentDir+'\file.ini') then
    begin
      IniFile := TIniFile.Create (GetCurrentDir+'\file.INI');
      IniFile.ReadSectionValues ('section', ListBox1.Items);
      IniFile.Free;
    end;
  end;

 
на выходе получаю ListBox1.Items
param=data1
param=data1
param=data1
....
как же скопировать значения как надо??

----------
Время и место каждого Подвига определяется Судьбой.
Но если не придет Герой - не будет и Подвига.

Всего записей: 976 | Зарегистр. 30-07-2003 | Отправлено: 11:27 25-04-2007
PowerChute



Full Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
== Удалено ==

Всего записей: 520 | Зарегистр. 13-10-2004 | Отправлено: 11:36 25-04-2007 | Исправлено: PowerChute, 11:37 25-04-2007
Ang



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
s1n
Если дать значениям в секции разные имена, то и получится что надо. А так берется первое же найденное значение для имени param.

Всего записей: 251 | Зарегистр. 25-07-2001 | Отправлено: 14:03 25-04-2007
HekTo

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
OdesitVadim

Цитата:
попробуйте ребилд делать Ctrl+F9. Очень часто помогало с подобными проблемами и в младших версиях

Пробовал, бестолку

Всего записей: 189 | Зарегистр. 30-09-2003 | Отправлено: 14:28 25-04-2007
Arvur



Silver Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
HekTo
Эээ... А ты не повелся на "Ctrl+F9"? Это вобще-то compile всегда было..
Сделай именно build
 
Похожая ощибка с drf встречалась еще на Delphi 7 - гуглом искать не пробовал?

Всего записей: 2111 | Зарегистр. 18-01-2002 | Отправлено: 14:51 25-04-2007
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (все версии) - часть 3
ShIvADeSt (07-04-2008 02:27): продолжение в http://forum.ru-board.com/topic.cgi?forum=33&topic=9383


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2025

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru