AkelPad Forum Index AkelPad
Support forum
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Вставка в множества файлов в строку названия файла

 
Post new topic   Reply to topic    AkelPad Forum Index -> Discussion (Russian)
View previous topic :: View next topic  
Author Message
webkontrast



Joined: 04 Sep 2011
Posts: 3

PostPosted: Sun Sep 04, 2011 7:57 am    Post subject: Вставка в множества файлов в строку названия файла Reply with quote

Здравствуйте. Не так давно открыл для себя хороший редактор AkelPad Много раз спасал, однако тут задачка стала:
Вообщем есть более 400 файлов в расширении php типа 1alm.php 2alm.php
В тесте нужно в определенную строку сделать так, что бы вставлялось название этого файла, но без расширения(впринципе и с расширением можно, потом его просто удалить массово)

Подскажите как. а то уже глаза болят
Спасибо
Back to top
View user's profile Send private message
Instructor
Site Admin


Joined: 06 Jul 2006
Posts: 5454

PostPosted: Sun Sep 04, 2011 9:38 am    Post subject: Reply with quote

Как шаблон скрипта можно взять DelTrailSpacesAll.js и вместо
Code:
AkelPad.SendMessage(hMainWnd, 273 /*WM_COMMAND*/, 4174 /*IDM_EDIT_DELETE_TRAILING_WHITESPACES*/, 0);
написать код получения имени текущего файла и его вставку в необходимое место.
Back to top
View user's profile Send private message Send e-mail
webkontrast



Joined: 04 Sep 2011
Posts: 3

PostPosted: Sun Sep 04, 2011 10:23 am    Post subject: Reply with quote

Instructor wrote:
Как шаблон скрипта можно взять DelTrailSpacesAll.js и вместо
Code:
AkelPad.SendMessage(hMainWnd, 273 /*WM_COMMAND*/, 4174 /*IDM_EDIT_DELETE_TRAILING_WHITESPACES*/, 0);
написать код получения имени текущего файла и его вставку в необходимое место.


Для меня это темный лес. Был бы признателен за помощь!
Back to top
View user's profile Send private message
webkontrast



Joined: 04 Sep 2011
Posts: 3

PostPosted: Sun Sep 04, 2011 11:24 am    Post subject: Reply with quote

Instructor
Напишите пожалуйства как реализовать
Back to top
View user's profile Send private message
Instructor
Site Admin


Joined: 06 Jul 2006
Posts: 5454

PostPosted: Sun Sep 04, 2011 11:50 am    Post subject: Reply with quote

webkontrast
Используем AkelPad.GetEditFile, AkelPad.SetSel, AkelPad.ReplaceSel.
Back to top
View user's profile Send private message Send e-mail
KDJ



Joined: 06 Mar 2010
Posts: 1414
Location: Poland

PostPosted: Sun Sep 04, 2011 1:15 pm    Post subject: Reply with quote

webkontrast
The following code save in a file named eg. InsertFileBaseNameAll.js
Code:
//based on DelTrailSpacesAll.js by Instructor
//http://akelpad.sourceforge.net/forum/viewtopic.php?p=3370#3370

var hMainWnd=AkelPad.GetMainWnd();
var hWndFrameInit;
var sFile;

if (hMainWnd)
{
  //Initial MDI frame
  hWndFrameInit=AkelPad.SendMessage(hMainWnd, 1288 /*AKD_FRAMEFIND*/, 1 /*FWF_CURRENT*/, 0);

  for (;;)
  {
    sFile = AkelPad.GetEditFile(0);
    sFile = sFile.substring(sFile.lastIndexOf("\\") + 1).replace(/\.[^.]*$/, "");
    AkelPad.ReplaceSel(sFile, 1);

    //Next MDI frame
    AkelPad.SendMessage(hMainWnd, 273 /*WM_COMMAND*/, 4316 /*IDM_WINDOW_FRAMENEXT*/, 0);
    if (hWndFrameInit == AkelPad.SendMessage(hMainWnd, 1288 /*AKD_FRAMEFIND*/, 1 /*FWF_CURRENT*/, 0))
      break;
  }
}

Put this script in a directory ...\AkelPad\AkelFiles\Plugs\Scripts\
Enable Script plugin, open your files and run this script.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    AkelPad Forum Index -> Discussion (Russian) All times are GMT
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


SourceForge.net Logo Powered by phpBB © 2001, 2005 phpBB Group