![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TEMPLATE. Как при создании события в редакторе кода сделать...
Den © (2012-12-23 05:36:00)delphi 2010
К примеру при нажатии на onclick вместо стандартного
procedure TForm1.Button2Click(Sender: TObject);
begin
end;
чтоб было
procedure TForm1.Button2Click(Sender: TObject);
var
i:integer;
begin
end;
Den (2012-12-26 08:49:00) [1]не не яж не про эту переменную эту и у меня добавляет я думал у Дмитрия С оно ее сразу прописывает до begin типа было
procedure w;
begin
end;
а стало
procedure w;
var
i:integer;
begin
for i:=0 to high do
end;
Den (2012-12-26 08:46:00) [2]Нет, определенно не добавляет, добавляет только вот это
for I := 0 to High do
Ega23 (2012-12-26 08:44:00) [3]
> Спасибо! только чет я не вижу де оно тут переменную добавляет.
val
Den (2012-12-26 08:36:00) [4]Спасибо! только чет я не вижу де оно тут переменную добавляет.
Дмитрий С (2012-12-26 01:04:00) [5]
<?xml version="1.0" encoding="utf-8" ?>
<codetemplate xmlns=" http://schemas.borland.com/Delphi/2005/codetemplates"
version="1.0.0">
<template name="for" invoke="auto">
<script language="Delphi" onenter="false" onleave="false" onvalidate="true">
ValidateForTemplate;
</script>
<point name="index">
<text>
I
</text>
<hint>
loop counter
</hint>
</point>
<point name="val">
<text>
Low
</text>
<hint>
loop low bound
</hint>
</point>
<point name="count">
<text>
High
</text>
<hint>
loop high bound
</hint>
</point>
<description>
for (no begin/end)
</description>
<author>
Embarcadero
</author>
<script language="Delphi" onenter="false" onleave="true">
DeclareVariable(|index|);
</script>
< code language="Delphi" context="methodbody" delimiter="|"><![CDATA[for |index| := |val| to |count| do
|*||end|
]]>
</ code>
</template>
</codetemplate>
Den (2012-12-25 05:00:00) [6]У меня XE при написании for сам добавляет переменную в секцию var. - вот еслиб вы его view->templates->edit и сюда скопировали, от бы как хорошо было
Дмитрий С (2012-12-25 02:27:00) [7]У меня XE при написании for сам добавляет переменную в секцию var.
Den (2012-12-25 00:58:00) [8]брат Птибурдукова - ты наберёшь имя темплейта в нужном месте и нажмёшь ctrl-j" это я пользую, но хотелось изначально ничего не нажимать, к примеру вот как цикл for прописывается сам, только убрал оттуда слово list чтоб вписывало for i:=0 to .count-1 и все, но там была стандартная заготовка.
Правильно — для этого нужен эксперт, см. [1]. - а это я, после того как автор поста упомянул про усилия, даже смотреть не стал, потому как макрос более менее устраивает.
брат Птибурдукова (2012-12-25 00:40:00) [9]
> Только чтото похоже создание событий не описано не в одном
> темплейте.
Правильно — для этого нужен эксперт, см. [1].
> кстати макрос работает на ура единственное что не вижу как
> его сохранить для последующего пользования и по всей видимости
> он только один.
Можно сделать таки темплейт, но это не "автоматически пропишет var i: integer", а "ты наберёшь имя темплейта в нужном месте и нажмёшь ctrl-j"
Примеры можно найти в C:\Program Files (x86)\Embarcadero\RAD Studio\9.0\ObjRepos\en\Code_Templates
Игорь Шевченко (2012-12-25 00:25:00) [10]
> у меня 90% всех процедур требуют real
у тебя 90% процедур требуют Double
Den (2012-12-25 00:11:00) [11]брат Птибурдукова -
1. Автор как раз в названии темы поставил слово TEMPLATE с целью узнать делал ли кто-то что-то подобное с помощью этих заготовок. Только чтото похоже создание событий не описано не в одном темплейте.
2. Насколько понял я, задача в том, чтоб среда при даблклике на батоне сама создала заготовку - именно так.
alexdn
1. у меня 90% всех процедур требуют real - вот и вам бы пригодилось чтоб в эдиторе сразу процедура с var real прописывалась.
2. буфер обмена не пробовал кстати использовать? очень удобная вещь. - можно поподробнее, что имеется в виду?
кстати макрос работает на ура единственное что не вижу как его сохранить для последующего пользования и по всей видимости он только один.
alexdn (2012-12-24 22:40:00) [12]буфер обмена не пробовал кстати использовать? очень удобная вещь.
alexdn (2012-12-24 22:39:00) [13]> Den (23.12.12 12:10) [2]
> Видимо нет. Думал просто есть простой способ как это исправить.
> А так 90% всех процедур так или иначе требуют Integer,
> почему сразу его не вписывать.
у меня 90% всех процедур требуют real
брат Птибурдукова (2012-12-24 11:22:00) [14]
> O'ShinW © (24.12.12 10:38) [7]
Насколько понял я, задача в том, чтоб среда при даблклике на батоне сама создала заготовку
> procedure TForm1.Button2Click(Sender: TObject);vari:integer;
> beginend;
O'ShinW (2012-12-24 10:38:00) [15]
> это не только в семёрке, они и в хе2 есть. непонятно только,
> насколько они соотносятся с хотелками автора.
повесить на "v:" Ctrl+J вставку
> var
> i:integer;
не?
брат Птибурдукова (2012-12-24 09:44:00) [16]
> O'ShinW © (24.12.12 09:02) [5]
это не только в семёрке, они и в хе2 есть. непонятно только, насколько они соотносятся с хотелками автора.
O'ShinW (2012-12-24 09:02:00) [17]а в 7 есть, например, Code Templates
Возможно, в 2010 это тоже самое, что Keyboard macros, но если нет, то вот :)
т.е.
Печатаю "smf", нажимаю Ctrl+J, получаю "ShowMessageFmt(' | ',[]);"
Проблема одна - запомнить все свои "сокращалки"
Den (2012-12-23 12:35:00) [18]Юрий Зотов, Спасибо!
Юрий Зотов (2012-12-23 12:26:00) [19]
> Den (23.12.12 12:10) [2]
Сделайте клавиатурный макрос (см. в справке: Keyboard macros)
Den (2012-12-23 12:10:00) [20]Видимо нет. Думал просто есть простой способ как это исправить. А так 90% всех процедур так или иначе требуют Integer, почему сразу его не вписывать.