1. Reklam


    1. joysro
      ledas
      jungler
      keasro
      zeus
      karantina

Programs (Programlar) altındaki grupların listesi


  1. Redefine

    Redefine Old School olduser rank8

    Kayıt:
    21 Kasım 2007
    Mesajlar:
    3.152
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    36
    [​IMG]

    lll :idea: lll Programs (Programlar) altındaki grupların listesi lll :idea: lll

    Form üzerine bir tane listbox, bir tane Button ve bir tane de DdeClientConv bileşeni koyun. DdeClientConv bileşeninin DDEService ve DDETopic özelliklerini "Progman" (tırnaklar yok) olarak değiştirin ve aşağıdaki kodu yazın;

    Kod:
    procedure TForm1.Button1Click(Sender: TObject);
    var
      P: PChar;
    begin
      ListBox1.Items.clear;
      P := DDEClientConv1.RequestData('Groups');
      ListBox1.Items.SetText(P);
      StrDispose(P);
    end;
     
  2. Leader

    Leader Buralıyım rank8

    Kayıt:
    18 Ağustos 2007
    Mesajlar:
    4.966
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0
    Saol Ya Bunu Arıyordum