Basit kodlama hakkında yardım

Aşağı Git Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Delphi / C++ /Vb Basit kodlama hakkında yardım

Bu konudaki kullanıcılar: 1 misafir

3
Cevap 355
Tıklama 0
Öne Çıkarma

1. sayfa

Basit kodlama hakkında yardım

Cevap Yaz

serkanhizli95

5 yıl

Konu Sahibi

Arkadaşlar öncelikle herkese iyi günler. Ben şu şablonun .exe halini yapmak istiyorum. Bu 4 kutunun içerisine de örnek veriyorum 1 numaraya basıldığında otomatik seçili yere 8691 yazıp enter tuşu koyacak şekilde içerisine yazacağım kodlama lazım. Exe şablonunu oluştururum yalnız bu kutuların içerisine yazmam gereken kodu bilmiyorum. 2 numara yazan kutuya basıldığında 8692 + Enter olacak şekilde formül lazım. Teşekkür ederim.

< Resime gitmek için tıklayın >

< Bu ileti DH mobil uygulamasından atıldı >

Gökşen PASLI

5 yıl

Yarbay

otomatik seçili yer dediğin başka bir pencere mi öyleyse sendkeys konusunu araştır

Bu mesaja 1 cevap geldi.

serkanhizli95

5 yıl

Konu Sahibi

Hocam cevabınız için teşekkürler. Öncelikle şöyle söylemek gerekirse barkod yazan yer seçili halde iken sağ altta ki gibi bir program kurmak istiyorum o programın da üstünde ki numaralı tuşlara bastığım da istediğim metni ve enter görevini görecek kodlama gerekiyor içerisine onu yapmak istiyorum. Seçili iken numaralı kutuya bastığımda 8691 + Enter gorevini görecek. Ekran klavyesinden sürekli bunları tuşlamak zor olduğundan ötürü böyle bir kısayol yapmak istiyorum ya da önereceğiniz bir şey var ise oda olabilir.

< Resime gitmek için tıklayın >

< Bu ileti DH mobil uygulamasından atıldı >

Bu mesajda bahsedilenler: @Gökşen PASLI

Gökşen PASLI

5 yıl

Yarbay

power shell scripti hesap makinesi için test ettim çaışıyor metni ps1 uzantılı olarak kaydet powershell scriptlerine izin vermen gerekir çalışması için keydi uygulamanın exesini yazarsın calc yerine ve açık olsun hem uygulama hem şansın


	
Add-Type -AssemblyName PresentationFramework 
 Add-Type @"
  using System;
  using System.Runtime.InteropServices;
  public class SFW {
     [DllImport("user32.dll")]
     [return: MarshalAs(UnmanagedType.Bool)]
     public static extern bool SetForegroundWindow(IntPtr hWnd);
  }
"@

[xml]$XAML  = @"
<Window
	xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
	xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
	
	x:Name="Window"
	Title="Uygulama"
	Width="128" Height="96" ResizeMode="NoResize" Topmost="True">

	<Grid x:Name="LayoutRoot">
		<UniformGrid Columns="2" Rows="2">
					<Button x:Name="btn1" Content="8691"></Button>
				<Button x:Name="btn2" Content="8692"></Button>
					<Button x:Name="btn3" Content="8693"></Button>
						<Button x:Name="btn4" Content="8694"></Button>
		</UniformGrid>
	</Grid>
</Window>
"@

$reader=(New-Object System.Xml.XmlNodeReader  $xaml)

  $Window=[Windows.Markup.XamlReader]::Load(  $reader )  

  $btn1 = $window.FindName("btn1")
 
  $btn2 = $window.FindName("btn2")
  
  $btn3 = $window.FindName("btn3")
  
  $btn4 = $window.FindName("btn4")
  $process =(get-process calc)
  if ($process -eq $null)
  {
  [System.Windows.MessageBox]::Show('Uygulama Açık Değil')
  return
  }

  $handle=$process.MainWindowHandle


  $btn1.Add_Click({
 

[SFW]::SetForegroundWindow($handle)
[void] [System.Reflection.Assembly]::LoadWithPartialName("'System.Windows.Forms")
[System.Windows.Forms.SendKeys]::SendWait($btn1.Content)
[System.Windows.Forms.SendKeys]::SendWait({ENTER})    
})

  $btn2.Add_Click({

[SFW]::SetForegroundWindow($handle)
[void] [System.Reflection.Assembly]::LoadWithPartialName("'System.Windows.Forms")
[System.Windows.Forms.SendKeys]::SendWait($btn2.Content)
[System.Windows.Forms.SendKeys]::SendWait({ENTER})    
})

  $btn3.Add_Click({
 
[SFW]::SetForegroundWindow($handle)
[void] [System.Reflection.Assembly]::LoadWithPartialName("'System.Windows.Forms")
[System.Windows.Forms.SendKeys]::SendWait($btn3.Content)
[System.Windows.Forms.SendKeys]::SendWait({ENTER})    
})

  $btn4.Add_Click({
 
[SFW]::SetForegroundWindow($handle)
[void] [System.Reflection.Assembly]::LoadWithPartialName("'System.Windows.Forms")
[System.Windows.Forms.SendKeys]::SendWait($btn4.Content)
[System.Windows.Forms.SendKeys]::SendWait({ENTER})    
})
 $Window.ShowDialog()

< Bu mesaj bu kişi tarafından değiştirildi Gökşen PASLI -- 1 Mart 2020; 15:49:13 >

Cevap Yaz

1. sayfa

Tüm Forumlar Web Tasarım - Programlama Yazılım Geliştirme Delphi / C++ /Vb Basit kodlama hakkında yardım