|
22.10.2014 14:45
tarkansimsek60
|
|
Merhaba arkadaşlar arştırdım fakat bir sonuca ulaşamadım. Ben sürekli auto cad'e cizim yapan birisiyim günde hiç çizmiyorsam 20 parça çizip imalata veriyorum haliyle benim için hergün tarihi güncellemek çizdiğim parçalarının sürekli ismini değiştirmek sorun oluyor.
İstediğim şeye gelince bir antet yaptım ve o antette tarihin ben bir komut vermeden sürekli güncel olmasını istiyorum.
2. olarakta dosyaya verdiğim ismin antette belirttiğim kısımda görünmesini istiyorum
Böyle birşey mümkünmü (solid workste var)
Simdiden teşşekür ederim. İyi forumlar.
|
|
22.10.2014 15:05
 Travaci
|
|
%<\AcVar Filename \f "%fn2">% Dosya ismi
%<\AcVar SaveDate \f "M/d/yyyy">% Save tarihi
Kodları Ctrl+C ile kopyalayıp Ctrl+V yapıştırın.
Daha kapsamlı görmeniz için field menüsünü inceleyin.
|
|
30.10.2014 11:00
tarkansimsek60
|
Çok teşekkür ederim. Bir sorum daha var. Auto cad cizimimi bir dosyanın antet kısmında benim belirlediğim bir noktada dosyasına verdiğim ismi otomatik olarak yazması mümkünmü bu komutla.
Resimlede anlatıcak olursam
Yeni dosya açtım adını deme 1 koydum bunun içine auto cad dosyamı atıp resim çizdim
Antet kısmına geçtiğimdede otomatık okarak ''deneme 1 '' yazısını cizim isminde bulmak istiyorum (ben yazmadan)
|
|
30.10.2014 11:43
 seboli61
|
 340781-bfindv2-0.rar Bu verdiğim Dwg dosyalarını açmadan Text leri istediğiniz gibi değiştirebiliyorsunuz. Belki faydası olur diye paylaşayım.
|
|
30.10.2014 12:41
Travaci
|
Böyle birşeymi ? DENEME 1 yazısıyla dosya ismini değiştiricek.
Kod:
(defun c:trkn (/ et n) (vl-load-com)
(setq et (ssget "x" (list (cons 0 "text") (cons 1 "DENEME 1"))) n -1)
(setvar "cmdecho" 0) (vl-cmdf "_.undo" "be")
(if et (while (< (setq n (1+ n)) (sslength et))
(vla-put-TextString (vlax-ename->vla-object (ssname et n))
"%<\\AcVar Filename \\f "%fn2">%")))
(vl-cmdf "_.undo" "e") (setvar "cmdecho" 1) (princ))
|
|
30.10.2014 12:54
tarkansimsek60
|
|
Peki nasıl kullanacağız kardeşim bunu bir vidyolu anlatım filan varmı.
|
|
30.10.2014 13:15
seboli61
|
Örnek olarak 1 klasörün içinde 10 tane dwg var. Bir tanesini aç lispi çalıştır sonra  Normal FIND komutu gibi Bulunacak isim yeni isim daha sonra Directory nerede yapılsın diye seç sonra OK dedin mi değiştirmiş olur. Hafızada kalmasını istediğin şey olursa Kaydedebiliyorsun da
|
|
30.10.2014 15:18
tarkansimsek60
|
|
Travaci verdiğin kodu yapıştırıyorum antet kısmına fakat bişey olmuyor farklı bir biçimdemi kullanıcaz bu kodu ?
|
|
30.10.2014 15:30
tarkansimsek60
|
Birkaç sorunumu sizin sayenizde çözdüm çok sağolun fakat en son olarak şu sorunla karşı karşıyayım field komutunun ne işe yaradığını 2 gün önce bu sitede öğrendim onun için beni maruz görün arkadaşlar
Resimdede gösterdiğim gibi dosya ismimin antete aktarılmasını istiyorum. Mumkunse tabi
|
|
11.11.2014 09:45
tarkansimsek60
|
|
Konu günceldir arkadaşlar sorunumu daha çözemedim
|
|
11.11.2014 11:38
seboli61
|
|
Sanırsam değiştirmek istediğin Layout içinde Bfind çalıştırdığında Ayarlarında sadece Layout seç belki öle olabilir. Birde bu dosya ismi TEXT mi ?
|
|
11.11.2014 11:45
kerem1453
|
|
dosya klasör yolunu versin dersen c:\users\pc\desktop\deneme1\dosya adı şeklinde verir bu şekilde senin işini görmez sanırım.dwg nin adını verebiliyor diye biliyorum yol şeklinde yaparsan istedigini tam elde edemezsin.travacının yazdıgı kodları herhangi bi yazına editle giriş yapıp ctrl+c ctrl+v yaparsan field olarak ilişkilendirilmiş şekilde dosya adın veya dosya kayıt tarihini vermiş olursun.bu konu ile ayrıntılı açıklama aşırı bi şekilde döküman yok field hakkında internetten ilgili videoları izlersen çokta zor değil en azından istedigini yapmak konusunda biraz bilgi sahibi olur yaparsın.
|
|
11.11.2014 12:39
 özkan-wien
|
|
%<\AcVar Filename \f "%fn1">% - klasör adi
%<\AcVar Filename \f "%fn6">% - dwg dosya adi
%<\AcVar Filename \f "%fn7">% - klasör ve dosya adi beraber
%<\AcDiesel $(getvar,ctab)>% - Layout adi
%<\AcDiesel $(substr,$(getvar,cdate),7,2)"/"$(substr,$(getvar,cdate),5,2)"/"$(substr,$(getvar,cdate),1,4)>% - tarih
mesele cok uzamis , text nesneni isaretleyip sag tikla fielde yapistir hangisini istiyorsan.
|
|
28.07.2017 09:05
merwik
|
Çok teşekkürler :)
Alıntı
Travaci :
%<\AcVar Filename \f "%fn2">% Dosya ismi
%<\AcVar SaveDate \f "M/d/yyyy">% Save tarihi
Kodları Ctrl+C ile kopyalayıp Ctrl+V yapıştırın.
Daha kapsamlı görmeniz için field menüsünü inceleyin.
|
macros55
|
|
%<\AcVar PlotDate \f "HH:mm:ss">% çİzgiyi çıktı yaptığın zamanın tarihini yazar
|
