Hayalet

CHW
  • Mesaj sayısı

    1.612
  • Üyelik tarihi

  • Son ziyareti

  • Days Won

    9

Everything posted by Hayalet

  1. @Ozan Başeski teşekkür ederim bilgi için.
  2. İpad 2 mi var Ties sende ?
  3. Evet cok tesekkur ederim aynen dediginiz gibi sorun cozuluyor.
  4. Merhaba Tekrar, ACAD isimli bir obje tanımladım : Autodesk.AutoCAD.Interop.AcadApplication ACAD = new Autodesk.AutoCAD.Interop.AcadApplication(); Sonra bu objeyi aşağıdaki metoda göndermek istiyorum ; psADH_Netload(ACAD, AppDomain.CurrentDomain.BaseDirectory + "AdhAcadLib.dll"); Ama şu hatayı alıyorum ACAD objesini algılayamadı ,çok basit bir hata ama vb.net te çalışan yöntem burada niye çalışmadı anlayamadım ... OleMessageFilter.Register(); try { string path = AppDomain.CurrentDomain.BaseDirectory; path = path + "şablon.dwt"; Autodesk.AutoCAD.Interop.AcadApplication ACAD = new Autodesk.AutoCAD.Interop.AcadApplication(); ACAD.Visible = true; //ACAD.Application.WindowState = ACAD.ActiveDocument.Close(); ACAD.Application.Documents.Add(path); } catch (Exception ex) { Console.WriteLine(ex.Message); } OleMessageFilter.Revoke(); // Netload AdhAcadLib.dll psADH_Netload(ACAD, AppDomain.CurrentDomain.BaseDirectory + "AdhAcadLib.dll"); "Error 3 The name 'ACAD' does not exist in the current context " içine göndermek istediğim metod da böyle birşey : public static void psADH_Netload(Autodesk.AutoCAD.Interop.AcadApplication ACAD, string path) { AcadDocument doc = ACAD.ActiveDocument; try { doc.SendCommand("SETVAR\rFILEDIA\r0\r"); doc.SendCommand("NETLOAD\r" + path + "\r"); doc.SendCommand("SETVAR\rFILEDIA\r1\r"); } catch (Exception ex) { Console.WriteLine(ex.Message); } }
  5. https://www.origin.com/en-gb/store/buy/dragon-age-inq-f2p/pc-download/base-game/standard-edition şöyle birşey var 6 saat single sınırsız multiplayer oynayabiliyormussun katıldım hemen... Multisi nasıl bir şey bu oyunun ?
  6. Çok sağ olun arkadaşlar böyle çalıştı : Console.WriteLine("KAL={0}\t{8}\nKB={1}\t{9}\nKL={2}\t{10}\nGB={3}\t{11}\nGL={4}"+ "\t{12}\nGD={5}\t{13}\nGX={6}\t{14}\nGY={7}\t{15}", KAL, KB, KL, GB, GL, GD, GX, GY, AC1, AC2, AC3, AC4, AC5, AC6, AC7, AC8);
  7. Bu ilginç güzel bir yorum olmuş, panik halindeki adam gibi driver bile çıkaramayan AMD 'nin mantle gibi bir grafik yazılımına ayıracak kaynağı nasıl bulduğunu hep düşünmüşümdür zaten. Mantle iyiydi gerçekten BF4'te bu arada.
  8. C# mühendislik ve bilimsel hesaplamalarda hantal kalıyor galiba örneğin bir ^ operatörü yok iki sayının üssünü almak için bu kadar çok prosedür olmaması lazım. Karmaşık formüller daha da okunamaz hale geliyor: float Result, Number1, Number2; Number1 = 2; Number2 = 2; Result = Math.Pow(Number1, Number2); Kalansız bölme yapmak ayrı ikence : float div = (float)a / b
  9. C# sözdizimi bana biraz ters geldi, satır sonunda ; kullanmayı da hep unutuyorum. Biraz alışmam gerekecek anlaşılan. Öte yandan VB nin ortadan kalkması çok uzun zaman alır diye düşünüyorum Fortran gibi diller bile destekleniyor hala yeni sürümlerde ki benim çalıştığım yerde ana programlar Fortran ile yazılmış 20 sene önce. Hala arka planda onlar çalışıp duruyor orayı yama burayı düzelt bir şekilde.
  10. Selam evet MSDN aboneliği ile mail adresime bağladım. Bir tanecik W8.1 pro 'yu evdeki bir bilgisayarıma kurarsam ne olur acaba ?
  11. <Not: En alt mesajda sorun çözüldü> Selamlar, VB.NET ile AutoCAD çalıştırıp bazı işlemler yaptırmak istiyorum. Bunun için COM arayüzündeki bazı nesneleri referans olarak ekledim ama garip bir durum olarak .NET, COM 'un işini bitirmesini beklemiyor bir sonraki satıra geçiyor. (Yani AutoCAD 'ın yüklenmesini beklemiyor) doğal olarak şurada hata alıyorum eğer timer koymaz isem : ACAD.Visible = True çünkü hazır değil... Bu konu hakkında fikir verebilecek olan var mı ? Kod aşağıdaki şekilde. Imports System Imports System.Runtime.InteropServices Imports Autodesk.AutoCAD.Interop Dim path As String = "C:\drawingx.dwg" Dim ACAD As New Autodesk.AutoCAD.Interop.AcadApplication System.Threading.Thread.Sleep(1000) Dim status As Boolean = ACAD.GetAcadState.IsQuiescent Do Until status = True System.Threading.Thread.Sleep(1000) status = ACAD.GetAcadState.IsQuiescent Loop ACAD.Visible = True ACAD.Application.WindowState = Common.AcWindowState.acMax ACAD.ActiveDocument.Close() 'Bu Drawing1.dwg yi kapatır. ACAD.Application.Documents.Open(path)
  12. Bu sorunun tam çözümü bu yukarıdaki kod her zaman çalışmıyor malesef : Imports System.Runtime.InteropServices ' Reference Microsoft Development Environment 8.0 for this class <ComImport(), Guid("00000016-0000-0000-C000-000000000046"), InterfaceTypeAttribute(ComInterfaceType.InterfaceIsIUnknown)>Public Interface IOleMessageFilter <PreserveSig()> Function HandleInComingCall(ByVal dwCallType As Integer, ByVal hTaskCaller As IntPtr, ByVal dwTickCount As Integer,ByVal lpInterfaceInfo As IntPtr) As Integer <PreserveSig()> Function RetryRejectedCall(ByVal hTaskCallee As IntPtr, ByVal dwTickCount As Integer,ByVal dwRejectType As Integer) As Integer <PreserveSig()> Function MessagePending(ByVal hTaskCallee As IntPtr, ByVal dwTickCount As Integer,ByVal dwPendingType As Integer) As Integer End Interface Public Class MessageFilter Implements IOleMessageFilter <DllImport("Ole32.dll")>Private Shared Function CoRegisterMessageFilter(ByVal newFilter As IOleMessageFilter, ByRef oldFilter As IOleMessageFilter) As Integer End Function Public Shared Sub Register() Dim newFilter As IOleMessageFilter = New MessageFilter() Dim oldFilter As IOleMessageFilter = Nothing CoRegisterMessageFilter(newFilter, oldFilter) End Sub Public Shared Sub Revoke() Dim oldFilter As IOleMessageFilter = Nothing CoRegisterMessageFilter(Nothing, oldFilter) End Sub Public Function HandleInComingCall(ByVal dwCallType As Integer, ByVal hTaskCaller As System.IntPtr, ByVal dwTickCount As Integer, ByVal lpInterfaceInfo As System.IntPtr) As Integer Implements IOleMessageFilter.HandleInComingCall Return 0 End Function Public Function MessagePending(ByVal hTaskCallee As System.IntPtr, ByVal dwTickCount As Integer, ByVal dwPendingType As Integer) As Integer Implements IOleMessageFilter.MessagePending Return 2 End Function Public Function RetryRejectedCall(ByVal hTaskCallee As System.IntPtr, ByVal dwTickCount As Integer, ByVal dwRejectType As Integer) As Integer Implements IOleMessageFilter.RetryRejectedCall If (dwRejectType = 2) Then Return 99 'Value >=0 and <100: the call is to be retried immediately 'Value >=100: COM will wait for this many milliseconds and then retry the call 'Value -1: the call should be canceled. COM the Returns RPC_E_CALL_REJECTED for the original method call Else Return -1 End If End Function End Class
  13. Arkadaşlar konu dışı soruda ben sorayım, bu konuyu okuyan bilgisi ilgisi olan arkadaşlar var diye buraya yazıyorum : Visual Studio 2013 professional lisansı aldırdım. Bir subscriber kodu geldi bu kodu microsoft accoutuma bağladım. Sonra My product keys kısmına girdiğim zaman adeta ağzım açık kaldı o kadar çok key varki şöyle bir resim göndereyim : Nedir çözemedim istersem bu keylerin hepsini claim edebiliyorum galiba W7,8,8.1 Vista 50-60 tane kod var orada ...
  14. peki bunu AMD kartlarla mi yapiyormus Flash player?
  15. Bu durup duruken olan kitlenmelerin nedeni RAM'ler olabilir mi acaba ? RAM 'ler anakartın desteklenen ramler listesinde var mı ?
  16. Bende disimi sikip bitirdim originsi artik hatta awakening i de bitirdim. Bir kere daha oyunun dizayni beni hayran birakti diyebilirim. Simdi 2 ye baslayacagim ama origin savelerini nasil import edecegimi henuz cozemedim import yapikiyor galiba degil mi ?
  17. OC yapmismiydiniz hic ? Daha omceki OC denemelerimde buna benzer durumlarla karsilasmistim stok hizlarina alinca sorun ortadan kalkmisti.
  18. Türkcell 500dk 1000sms 4GB 49TL ye anlaştım, iş yerimde diğer hatlar doğru dürüst çekmediği için diğer alternatifleri değerlendiremiyorum.
  19. Ani frene basan adam hala borç ödüyor olabilir. Martı belki de çoktan öldü gitti
  20. @infestor TTNET 'ı arayınca geliyorlar aşağıdaki kutudan öçtür kaçmış bakalım. Eğer aşağısı ile yukarısı arasında hız farkı yoksa terminalimi değiştirmek istiyorum dersin.
  21. Yorumlar için hepinize çok teşekkür ederim basit bir yüntemle çözdüm belki günün birinde birinin işine yarar : Imports System Imports System.Runtime.InteropServices Imports Autodesk.AutoCAD.Interop Dim path As String = "C:\Drawingx.dwt" Dim ACAD As New Autodesk.AutoCAD.Interop.AcadApplication Dim Status As String = "Run" Do Until Status = "Stop" Try ACAD.Visible = True Status = "Stop" Catch ex As Exception 'MessageBox.Show(ex.Message) System.Threading.Thread.Sleep(500) End Try Loop ACAD.Application.WindowState = Common.AcWindowState.acMax ACAD.ActiveDocument.Close() ACAD.Application.Documents.Open(path)
  22. MSI 'ın çok güzel oyuncu laptopları malzeme kalitesi ve tasarım olarak çok hoşuma gidiyor : http://www.sanalmarketim.com/msi-ge60-2qd1019xtr-apache-core-i54210h-8gb-1tb-gtx950m-156-full-hd-freedos-hediyeli/p_60192/
  23. Ses bence iyice gitti Bruce Dickinson 'da artık, keyif alamıyorum vokalden. Ditital dünyanın nimetleriyle albümde iyi bir vokal olur o ayrı bir konu.
  24. Mekanik klavye evet pahali ama PC basinda cok vakit gecirmek zorundaysaniz edinmek lazim alistiktan sonra ariyorsunuz gercekten. Ben oyun ve yazi yazmak icin kahverengi almistim ama simdi sirf yazi icin aklimda mavi var.
  25. Hayirli olsun hocam, bu klavye tuslari anladigim kadari cherry blue tarzi bastiginda klik sesi cikaran ozel bir tasarim.