lazarus

0熱

1答えて

私は現在、データベースに接続してDBGridにデータを表示するプログラムを持っていますが、このデータを抽出して別のアルゴリズムで使用できるようにする必要があります。私はコマンドを使用する場合：クイズから選択スコアをそれは、画面上の値を示しています。私は事前に [0]=23 [1]=55 [2]=64 感謝するように配列にこれらの値を取得するにはどうすればよい（23,55,64）。

-1熱

2答えて

は、それはこの単純な例では失敗したラザロ

でTStreamには作成できません Project project1 raised exception class 'External: SIGSEGV'. At address 10000DB38

1熱

1答えて

Lazarus ListBox SaveToFileファイル名に特殊文字

Windows XP/7/10をターゲットとするLazarus（1.5）fpc（3.1.1）でアプリケーションを書いています。私のアプリケーションは、ユーザが選択したいくつかのパスでファイルシステムのファイルを読み書きします。パスまたはファイル名は、例えば（A〜Eéのような）特殊文字が含まれている場合： C： 'EFCreateError' できませんに：\ユーザーは\DeAndrè\ アプリケ

1熱

1答えて

Pascal - プログラムがフォーム切り替え時にハングする

私は現在、10秒以内にクリック数をカウントし、2つの異なるファイルから名前とスコアを読み込み、別のフォームでさまざまな種類の名前とスコアを表示する簡単なアプリケーションを開発中です。しかし、ゲームが終了した後、 'ゲームオーバー！'メッセージが表示され、リーダーボードフォームが表示されますが、ボタンがなく、不思議そうに見えて、プログラムがクラッシュするようです。これは、フォームがどのように見える

0熱

1答えて

LazarusでのWindowsメッセージの受信と処理

私はDelphiで書いたクラスをLazarusに移植しようとしています。接続されたUSBデバイスを検出するには、WM_DEVICECHANGEが必要です。 Delphiで完全に機能していたのに、私のコンポーネントがWindowsのメッセージを受け取ることができません。 AllocateHwndがFree Pascalのプレースホルダであることを実感した後、私はLCLがその目的のために何をしているか

0熱

1答えて

HttpGetBinaryは、ファイル全体がダウンロードされるまで待機しますか？

私はインターネットから直接画像ファイルをダウンロードするために使用されるミニユーティリティプログラムを作成しています。私のプログラムがファンクションHttpGetBinaryを待つかどうか知りたいのですが、ファイル全体がダウンロードされたり、プログラムがこの機能を過ぎて実行されたりします。

3熱

2答えて

Lazarusでは、「ユニコードは潜在的なデータ損失を伴うキャスト」という警告をどのようにして防止しますか？

私はこのようなラザロWindowsプログラムでボタンのキャプションとしてTricolon Unicode文字＃$ 205Dを割り当てるしようとしている： MyButton.Caption := #$205D; それは動作しますが、ボタンはTricolonの罰金を表示しますが、コンパイラの発します警告：「警告：データ損失の可能性があるUnicode定数キャスト」。警告を削除するには、LCLコン

1熱

1答えて

Delphiのマルチライン・キャレット？

LazarusにはMulti Caretという機能があり、コードエディタ（ソースエディタ）でコードを一度に複数行に入力することができます。 Delphiにはこのような機能がありますか？

1熱

1答えて

Lazarusカーソル下のコントロールを見つける

私はこの投稿から次のコードを使用しています。 Code from Checked Answer 複数のTLabelのうちの1つからマウスカーソルの下にControl（Label.Caption）を取得する必要があります。LabelがMain Fromにあったときにうまくいきました。私はメインフォーム上のパネルにラベルを貼りましたが、これはパネルを見つけるだけです。私はこれがパネル上にある多数の

-3熱

1答えて

Canvas.CopyRectは機能しません

どうか、私を助けてください！私は何かを描き、それをbmpファイルとして保存する必要があります。私は次のようにします： procedure TForm1.PaintBox1Paint(Sender: TObject); begin with PaintBox1, canvas do begin Pen.Style := psDash; pen.Width: